home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #11 / Amiga Plus CD - 2002 - No. 11.iso / CD_System / Visage / Install Visage < prev    next >
Text File  |  1998-06-07  |  70KB  |  2,254 lines
  1. ;
  2. ; $VER: Install_Visage 39.15 (5.8.97)
  3. ;
  4. ; Installer script for Visage.
  5. ;
  6.  
  7.  
  8. (set #danish-lang        1)
  9. (set #german-lang        2)
  10. (set #english-lang       4)
  11. (set #spanish-lang       8)
  12. (set #french-lang       16)
  13. (set #italian-lang      32)
  14. (set #dutch-lang        64)
  15. (set #norwegian-lang   128)
  16. (set #russian-lang     256)
  17. (set #serbian-lang     512)
  18. (set #finnish-lang    1024)
  19. (set #swedish-lang    2048)
  20. (set #czech-lang      4096)
  21.  
  22.  
  23. ; Get current language (no need for lots of silly icons! ;). However, this
  24. ; won't properly work for all versions of the Installer. Some doesn't
  25. ; understand the language "default". :/
  26. (if (= (exists "Env:Language") 1)
  27.     ; GetEnv reports "String too long" if the variable doesn't exist! :(
  28.     ; Dunno if this is fixed in V43... But we need the check anyway.
  29.     (set @language (getenv "language"))
  30. )
  31.  
  32.  
  33. ;**************************************************************************
  34. ;
  35. ; English strings
  36. ;
  37.  
  38. (set #default-lang #english-lang)
  39.  
  40. (set #bad-kick
  41.     "You must have AmigaOS Release 3.0 or newer to use Visage."
  42. )
  43.  
  44. (set #welcome
  45.     (cat
  46.         "\n\n\nWelcome to the Visage installation utility.\n\n"
  47.         "This program lets you install Visage on your Amiga.\n\n\n"
  48.         "Visage © 1995-98 by Magnus Holmgren."
  49.     )
  50. )
  51.  
  52. (set #install-parts "Please select the parts you wish to install")
  53.  
  54. (set #item-visage "Visage")
  55.  
  56. (set #item-visage-guide "Visage.guide")
  57.  
  58. (set #item-locale "Translations")
  59.  
  60. ; The following four strings are program names. Normally, these shouldn't
  61. ; be translated, though one could consider appending some locale-specific
  62. ; text after the names.
  63.  
  64. (set #item-getmodeid "GetModeID")
  65.  
  66. (set #item-kill "Kill")
  67.  
  68. (set #item-makelink "MakeLink")
  69.  
  70. (set #item-deletelink "DeleteLink")
  71.  
  72. (set #item-unpackilbm "UnpackILBM")
  73.  
  74. (set #install-parts-help
  75.     (cat
  76.         "    Here you select the different parts of Visage that you would like to "
  77.         "install. After that, you select the details of the installation (such as "
  78.         "where the different files should be installed). You may choose to install "
  79.         "the following items:\n"
  80.         "    Visage: The actual picture viewer.\n"
  81.         "    Visage.guide: The manual, in AmigaGuide® format.\n"
  82.         "    Translations: If you install a translation, then Visage can operate in "
  83.         "the language(s) you select.\n"
  84.         "    GetModeID: A program that shows a screen mode requester, and prints "
  85.         "a decimal number that represents the selected screen mode.\n"
  86.         "    Kill: A program that can stop another program (sending \"break\" "
  87.         "signals). Similar to Break.\n"
  88.         "    MakeLink: A replacement for the MakeLink command that supports "
  89.         "soft links.\n"
  90.         "    DeleteLink: A simple Delete-clone that also deletes soft links "
  91.         "without a target.\n"
  92.         "    UnpackILBM: A program that unpacks the picture data in an IFF ILBM "
  93.         "picture (the BODY chunk).\n"
  94.         "    For more information about these parts, please read the manual.\n"
  95.     )
  96. )
  97.  
  98. (set #where-visage "Where would you like to install Visage?\nA drawer will NOT be created!")
  99.  
  100. (set #visage-020
  101.     (cat
  102.         "You seem to have a 68020 CPU or better, with a working "
  103.         "FPU, installed in your system. Do you want to install a version "
  104.         "of Visage optimized for your system?"
  105.     )
  106. )
  107.  
  108. (set #visage-000-only "Install normal version only.")
  109.  
  110. (set #visage-020-also "Install 68020 version (as \"Visage_020\").")
  111.  
  112. (set #visage-020-only "Install 68020 version only.")
  113.  
  114. (set #visage-020-help
  115.     (cat
  116.         "    Since you have a 68020 CPU or better installed, with a FPU, you "
  117.         "can, if you want, install a version of Visage optimized for your "
  118.         "system. You can choose to only install the normal version, install "
  119.         "the 68020 version as `Visage_020' in addition to the normal version, "
  120.         "or only install the 68020 version (as `Visage').\n"
  121.         "    Please note that the 68020 version will not work with a "
  122.         "68000 or 68010 CPU, nor if you do not have a FPU. The 68020 version "
  123.         "will silently exit on such systems."
  124.     )
  125. )
  126.  
  127. (set #visage-make-020 "Creating 68020 version of Visage...")
  128.  
  129. (set #where-visage-guide "Where would you like to install Visage.guide?")
  130.  
  131. (set #copy-guide-icon "Should I copy the icon for Visage.guide?")
  132.  
  133. (set #which-language "Which languages should be installed?")
  134.  
  135. (set #which-language-help
  136.     (cat
  137.         "    The Amiga can be operated in many different languages. If you "
  138.         "want Visage to use the same language as your Amiga Workbench, "
  139.         "then a couple of catalog files must be copied to your harddisk "
  140.         "for each language supported.\n"
  141.         "    To reduce the amount of space consumed by the language files, "
  142.         "you can select to have only the files of specific languages "
  143.         "copied.\n"
  144.         "    Simply check the boxes of the languages you wish to have have "
  145.         "available on your system.\n"
  146.     )
  147. )
  148.  
  149. (set #where-language
  150.     (cat
  151.         "Where do you want to install the language files?\n\n"
  152.         "You can install them in either the same drawer as the program "
  153.         "itself (select \"Program\") or in the 'global' volume "
  154.         "\"Locale:\" (select \"Locale:\")."
  155.     )
  156. )
  157.  
  158. ; These two strings must match the strings used in above in #where-language.
  159. ; The words in question are the quoted ones after "select" in the parentheses.
  160. (set #lang-progdir "Program")
  161.  
  162. (set #lang-locale  "Locale:")
  163.  
  164. (set #where-language-help
  165.     (cat
  166.         "    If you install the language files in the same drawer as Visage "
  167.         "itself (or rather, in subdirectories within that drawer), then you "
  168.         "need to move these files as well, if you move Visage to some other "
  169.         "drawer. If you install the language files in \"Locale:\" you don't "
  170.         "need to worry about them if you move Visage. On the other hand, you "
  171.         "will not have all Visage-related files in the same drawer."
  172.     )
  173. )
  174.  
  175. (set #builtin-lang "(default)")
  176.  
  177. (set #where-tools "Where would you like to install the extra programs?")
  178.  
  179. (set #where-tools-help
  180.     (cat
  181.         "    Here you specify where the programs GetModeID, Kill, MakeLink, "
  182.         "DeleteLink and UnpackILBM will be installed. Only the programs you "
  183.         "selected will be installed. Since these programs are Shell-only, "
  184.         "the default location is C:, where the systems Shell-only programs "
  185.         "can be found.\n"
  186.         "    It is recommended that you install these programs somewhere in "
  187.         "your command search path.\n"
  188.     )
  189. )
  190.  
  191. (set #copy "Copying %s to %s...")
  192.  
  193. (set #program-update "How do you want to update the tooltypes in the icon?")
  194.  
  195. (set #update-none "No update")
  196.  
  197. (set #update-all "Add all")
  198.  
  199. (set #update-since "Add new since %s")
  200.  
  201. (set #program-update-help
  202.     (cat
  203.         "    Since this installation updates an older version of Visage, "
  204.         "the icon will not be copied over. This to maintain any changes "
  205.         "you may have made to it. However, new tooltypes may have been added. "
  206.         "Here you can decide if you want to:\n"
  207.         "    No update: Skip this part.\n"
  208.         "    Add all tooltypes: existing tooltypes will not be changed "
  209.         "Any tooltypes you may have removed will be added again. The new "
  210.         "tooltypes will be added as well.\n "
  211.         "    Add new since 39.x: Only add the new tooltypes since that version. "
  212.         "Any existing tooltype not be changed.\n"
  213.     )
  214. )
  215.  
  216.  
  217. ;**************************************************************************
  218. ;
  219. ; Danish strings
  220. ;
  221.  
  222. (if (= @language "dansk")
  223.     (
  224.         (set #default-lang #dansk-lang)
  225.  
  226.         (set #bad-kick
  227.             "Du behøver AmigaOS version 3.0 eller højere for at kunne benytte Visage."
  228.         )
  229.  
  230.         (set #welcome
  231.             (cat
  232.                 "\n\n\nVelkommen til Visage installations programmet.\n\n"
  233.                 "Dette program lader dig installere Visage på din Amiga.\n\n\n"
  234.                 "Visage © 1995-98 af Magnus Holmgren."
  235.             )
  236.         )
  237.  
  238.         (set #install-parts "Vælg de dele du ønsker at installere")
  239.  
  240.         (set #item-visage "Visage")
  241.  
  242.         (set #item-visage-guide "Visage.guide")
  243.  
  244.         (set #item-locale "Oversættelser")
  245.  
  246.         (set #install-parts-help
  247.             (cat
  248.                 "    Her vælger du de forskellige dele af Visage som du vil installere. "
  249.                 "Derefter vælger du detaljer om installationen (såsom hvor de "
  250.                 "forskellige filer skal installeres). Du kan vælge imellem følgende dele:\n\n"
  251.                 "    Visage: Selve billedfremviseren.\n\n"
  252.                 "    Visage.guide: Manualen, i AmigaGuide®-format.\n\n"
  253.                 "    Oversættelser: Hvis du installerer en oversættelse, så kan Visage "
  254.                 "anvende de(t) sprog du vælger.\n\n"
  255.                 "    GetModeID: Et program som viser en skærm-opløsnings vælger, og "
  256.                 "dernæst udskriver et decimalt tal som svarer til den valgte "
  257.                 "skærm-opløsning.\n\n"
  258.                 "    Kill: Et program som kan stoppe andre programmer (ved at sende "
  259.                 "\"break\"-signaler). Minder om Break.\n\n"
  260.                 "    MakeLink: En erstatning for MakeLink, som understøtter soft-links.\n\n"
  261.                 "    DeleteLink: En simpel Delete klon, som også kan slette soft-links, "
  262.                 "uden en kildefil.\n\n"
  263.                 "    UnpackILBM: Et program som udpakker billeddataene i en IFF ILBM "
  264.                 "billede (ILBM.BODY \"chunk\").\n\n"
  265.                 "    For mere information om disse ting, se da venligst manualen.\n"
  266.             )
  267.         )
  268.  
  269.         (set #where-visage "Hvor ønsker du at installere Visage?\nDer vil IKKE blive oprettet en skuffe!")
  270.  
  271.         (set #visage-020
  272.             (cat
  273.                 "Du ser ud til at have en 68020 CPU eller bedre, med en fungerende FPU "
  274.                 "installeret i dit system. Ønsker du at installere en version af Visage "
  275.                 "som er optimeret til dit system?"
  276.             )
  277.         )
  278.  
  279.         (set #visage-000-only "Installer kun normal version.")
  280.  
  281.         (set #visage-020-also "Installer 68020 version (som \"Visage_020\").")
  282.  
  283.         (set #visage-020-only "Installer kun 68020 version.")
  284.  
  285.         (set #visage-020-help
  286.             (cat
  287.                 "    Da du har en 68020 CPU eller bedre installeret, med en FPU kan du, hvis "
  288.                 "du ønsker det, installere en version af Visage som er optimeret til "
  289.                 "dit system. Du kan vælge kun at installere den normale version, installere "
  290.                 "68020 versionen som `Visage_020' udover den normale version, "
  291.                 "eller kun at installere 68020 versionen (som `Visage').\n"
  292.                 "    Bemærk venligst at 68020 versionen ikke vil fungere med hverken en "
  293.                 "68000 eller 68010 CPU, eller hvis du ikke har en FPU. 68020 versionen "
  294.                 "vil uden output afslutte på sådanne systemer."
  295.             )
  296.         )
  297.  
  298.         (set #visage-make-020 "Laver 68020 version af Visage...")
  299.  
  300.         (set #where-visage-guide "Hvor ønsker du at installere Visage.guide?")
  301.  
  302.         (set #copy-guide-icon "Skal jeg kopiere ikonet til Visage.guide?")
  303.  
  304.         (set #which-language "Hvilke sprog ønskes installeret?")
  305.  
  306.         (set #which-language-help
  307.             (cat
  308.                 "    Amigaen kan arbejde med mange forskellige sprog. Hvis du ønsker "
  309.                 "at Visage skal anvende det samme sprog som Amiga Workbench, så "
  310.                 "må en katalogfil kopieres til din harddisk for hvert sprog som "
  311.                 "understøttes.\n"
  312.                 "    For at minimere pladsforbruget til katalogfilerne kan du vælge "
  313.                 "kun at installere filerne for nogle specifikke sprog.\n"
  314.                 "    Du skal bare markere de sprog som du vil have til rådighed "
  315.                 "i dit system.\n"
  316.             )
  317.         )
  318.  
  319.         (set #where-language
  320.             (cat
  321.                 "Hvor ønsker du at installere katalogfilerne?\n\n"
  322.                 "Du kan enten installere dem i den samme skuffe som programmet "
  323.                 "(vælg \"Program\"), eller på det \"globale\" volume "
  324.                 "\"Locale:\" (vælg \"Locale:\")."
  325.             )
  326.         )
  327.  
  328.         (set #lang-progdir "Program")
  329.  
  330.         (set #lang-locale  "Locale:")
  331.  
  332.         (set #where-language-help
  333.             (cat
  334.                 "    Hvis du installerer katalogfilerne i samme skuffe som "
  335.                 "Visage (eller snarere i underskuffer i denne skuffe), så "
  336.                 "skal du også flytte disse filer, hvis du flytter Visage "
  337.                 "til en anden skuffe. Hvis du installerer katalogfilerne "
  338.                 "i \"Locale:\" så behøver du ikke at tænke på dem hvis du "
  339.                 "flytter Visage. På den anden side, så har du ikke alle "
  340.                 "Visage-relaterede filer i den samme skuffe.\n"
  341.             )
  342.         )
  343.  
  344.         (set #builtin-lang "(indbygget)")
  345.  
  346.         (set #where-tools "Hvor ønsker du at installere de ekstra programmer?")
  347.  
  348.         (set #where-tools-help
  349.             (cat
  350.                 "    Her angiver du hvor programmerne GetModeID, Kill, MakeLink, "
  351.                 "DeleteLink og UnpackILBM skal installeres henne. Kun "
  352.                 "de programmer som du valgte tidligere vil blive kopieret. "
  353.                 "Da disse programmer kun kan startes fra Shell, så er "
  354.                 "standard destinationen C:, da systemets \"Shell-programmer\" "
  355.                 "findes der. Det anbefales at du installerer disse programmer "
  356.                 "et sted i kommando søgestien.\n"
  357.             )
  358.         )
  359.  
  360.         (set #copy "Kopierer %s til %s...")
  361.  
  362.         (set #program-update "Hvordan ønsker du at opdatere Tool Typerne i ikonet?")
  363.  
  364.         (set #update-none "Ingen opdatering")
  365.  
  366.         (set #update-all "Tilføje alle")
  367.  
  368.         (set #update-since "Tilføje alle siden %s")
  369.  
  370.         (set #program-update-help
  371.             (cat
  372.                 "    Da denne installation opdaterer en gammel version af "
  373.                 "Visage, så bliver ikonet ikke kopieret med. Det er for"
  374.                 "at bibeholde eventuelle ændringer som du har lavet. Men der "
  375.                 "kan være tilføjet nogle nye Tool Typer. Her kan du vælge "
  376.                 "hvad du vil gøre:\n\n"
  377.                 "    Ingen opdatering: Springer dette punkt over.\n\n"
  378.                 "    Tilføje alle: Tilføje alle Tool Typer. Eksisterende "
  379.                 "Tool Typer vil ikke blive ændret.\n\n"
  380.                 "    Tilføje alle siden 39.x: Tilføjer kun de nye Tool Typer "
  381.                 "siden denne version. Eventuelle eksisterende Tool Typer "
  382.                 "vil ikke blive ændret.\n"
  383.             )
  384.         )
  385.     )
  386. )
  387.  
  388.  
  389. ;**************************************************************************
  390. ;
  391. ; German strings
  392. ;
  393.  
  394. (if (= @language "deutsch")
  395.     (
  396.         (set #default-lang #german-lang)
  397.  
  398.         (set #bad-kick
  399.             "Visage benötigt AmigaOS Version 3.0 oder höher."
  400.         )
  401.  
  402.         (set #welcome
  403.             (cat
  404.                 "\n\n\nWillkommen zur Installation von Visage.\n\n"
  405.                 "Dieses Programm ermöglicht die Installation von Visage auf Ihrem Amiga.\n\n\n"
  406.                 "Visage © 1995-98  Magnus Holmgren."
  407.             )
  408.         )
  409.  
  410.         (set #install-parts "Bitte die zu installierenden Teile auswählen")
  411.  
  412.         (set #item-visage "Visage")
  413.  
  414.         (set #item-visage-guide "Visage.guide")
  415.  
  416.         (set #item-locale "Übersetzungen")
  417.  
  418.         (set #item-getmodeid "GetModeID")
  419.  
  420.         (set #item-kill "Kill")
  421.  
  422.         (set #item-makelink "MakeLink")
  423.  
  424.         (set #item-deletelink "DeleteLink")
  425.  
  426.         (set #item-unpackilbm "UnpackILBM")
  427.  
  428.         (set #install-parts-help
  429.             (cat
  430.                 "    Hier wählen Sie die verschiedenen Teile von Visage aus, die Sie "
  431.                 "installieren möchten. Danach wählen Sie die Details der Installation "
  432.                 "aus (wo z.B. die einzelnen Dateien installiert werden sollen). "
  433.                 "Sie können die Installation folgender Dinge vornehmen:\n"
  434.                 "    Visage: Der Bildanzeiger.\n"
  435.                 "    Visage.guide: Die Dokumentation, im AmigaGuide® Format. Wenn sie "
  436.                 "mit Hilfe des Installer Programms installiert wird, wird der Text an die "
  437.                 "aktuelle Bildschirmauflösung angepaßt. Wenn Sie die Installation von Hand "
  438.                 "vornehmen, ist der Text auf 76 Zeichen formatiert.\n"
  439.                 "    Übersetzungen: Wenn Sie eine Übersetzung installieren, dann kann "
  440.                 "Visage in dieser (diesen) Sprache(n) ablaufen.\n"
  441.                 "    GetModeID: Ein Programm, das ein Bildschirmmodus-Auswahlfenster "
  442.                 "anzeigt und eine Dezimalzahl ausdruckt, die den ausgewählten "
  443.                 "Bildschirmmodus repräsentiert.\n"
  444.                 "    Kill: Ein Programm, das ein anderes Programm stoppen kann "
  445.                 "(durch Senden eines \"Break\" Signals). Ähnlich wie Break.\n"
  446.                 "    MakeLink: Ein Ersatz für das MakeLink Kommando, das auch "
  447.                 "soft links unterstützt.\n"
  448.                 "    DeleteLink: Ein einfacher Ersatz für Delete, das auch soft links "
  449.                 "ohne Ziel löschen kann.\n"
  450.                 "    UnpackILBM: Ein Programm, das die Bilddaten in einem IFF ILBM "
  451.                 "Bild entpackt (den BODY chunk).\n"
  452.                 "    Für weitere Informationen über diese Teile lesen Sie bitte in "
  453.                 "der Dokumentation nach.\n"
  454.             )
  455.         )
  456.  
  457.         (set #where-visage "Wo würden Sie Visage gern installieren?\nEs wird KEIN Verzeichnis angelegt!")
  458.  
  459.         (set #where-visage-guide "Wo würden Sie gern Visage.guide installieren?")
  460.  
  461.         (set #copy-guide-icon "Soll das Piktogramm für Visage.guide kopiert werden?")
  462.  
  463.         (set #which-language "Welche Übersetzungen sollen installiert werden?")
  464.  
  465.         (set #which-language-help
  466.             (cat
  467.                 "    Der Amiga kann in verschiedenen Sprachen benutzt werden. "
  468.                 "Wenn Sie wünschen, Visage in der Sprache Ihrer Workbench zu "
  469.                 "benutzen, müssen einige Dateien für die unterstützten Sprachen "
  470.                 "auf Ihre Festplatte kopiert werden.\n"
  471.                 "    Um den benötigten Raum für die Übersetzungsdateien zu "
  472.                 "verringern, können Sie auswählen, nur Dateien für bestimmte "
  473.                 "Sprachen zu kopieren.\n"
  474.                 "    Wählen Sie einfach die Kästchen neben den Sprachen aus, die "
  475.                 "Sie auf Ihrem System verfügbar haben wollen.\n"
  476.             )
  477.         )
  478.  
  479.         (set #where-language
  480.             (cat
  481.                 "Wo würden Sie die Übersetzungen gern installieren?\n\n"
  482.                 "Sie können Sie entweder im gleichen Verzeichnis wie das Programm "
  483.                 "selbst (Knopf \"Programm\") oder in das 'globale' Verzeichnis "
  484.                 "\"Locale:\" (Knopf \"Locale:\") installieren."
  485.             )
  486.         )
  487.  
  488.         (set #lang-progdir "Programm")
  489.  
  490.         (set #lang-locale  "Locale:")
  491.  
  492.         (set #where-language-help
  493.             (cat
  494.                 "    Wenn Sie die Übersetzungsdateien in das gleiche Verzeichnis wie "
  495.                 "Visage selbst (oder besser, in Unterverzeichnisse in diesem Verzeichnis) "
  496.                 "installieren, müssen Sie diese Dateien auch verschieben, wenn Sie "
  497.                 "Visage in ein anderes Verzeichnis verschieben. Wenn die Übersetzungen "
  498.                 "in \"Locale:\" kopiert werden, brauchen Sie sich keine Sorgen zu "
  499.                 "machen, wenn Sie Visage verschieben. Auf der anderen Seite sind dann "
  500.                 "allerdings auch nicht alle Dateien von Visage im gleichen Verzeichnis."
  501.             )
  502.         )
  503.  
  504.         (set #builtin-lang "(eingebaut)")
  505.  
  506.         (set #where-tools "Wo würden Sie gern die Extra-Programme installieren?")
  507.  
  508.         (set #where-tools-help
  509.             (cat
  510.                 "    Hier geben Sie an, wo die Programme GetModeID, Kill, MakeLink, "
  511.                 "DeleteLink und UnpackILBM installiert werden sollen. Nur die von Ihnen "
  512.                 "ausgewählten Programme werden installiert. Da die Programme nur "
  513.                 "für die Benutzung in der Shell gedacht sind, ist das voreingestellte "
  514.                 "Ziel das C: Verzeichnis, wo sich die Shell-Programme des Systems "
  515.                 "normalerweise befinden.\n"
  516.                 "    Es wird empfohlen, diese Programme irgendwo im Kommando-"
  517.                 "Suchpfad zu installieren.\n"
  518.             )
  519.         )
  520.  
  521.         (set #copy "%s wird nach %s kopiert...")
  522.  
  523.         (set #program-update "Wie sollen die Piktogrammerkmale geändert werden?")
  524.  
  525.         (set #update-none "Keine Änderung")
  526.  
  527.         (set #update-all "Alle hinzufügen")
  528.  
  529.         (set #update-since "Alle seit %s neuen hinzufügen")
  530.  
  531.         (set #program-update-help
  532.             (cat
  533.                 "    Da diese Installation eine ältere Version von Visage ersetzt, "
  534.                 "wird das Piktogramm nicht überkopiert. Dies erhält die Änderungen, die "
  535.                 "Sie daran vorgenommen haben. Es können jedoch neue Merkmale hinzugefügt "
  536.                 "werden. Hier wählen Sie aus:\n"
  537.                 "    Keine Änderung: Dieser Teil wird übersprungen.\n"
  538.                 "    Alle hinzufügen: existierende Merkmale werden nicht geändert. "
  539.                 "Alle Merkmale, die Sie vielleicht entfernt haben, werden wieder "
  540.                 "hinzugefügt, alle neuen auch.\n "
  541.                 "    Alle seit 39.x hinzufügen: Nur die neuen Merkmale seit dieser "
  542.                 "Version hinzufügen. Existierende Merkmale bleiben unverändert.\n"
  543.             )
  544.         )
  545.     )
  546. )
  547.  
  548.  
  549. ;**************************************************************************
  550. ;
  551. ; Spanish strings - Translation by Dámaso D. Estévez <amidde@arrakis.es>
  552. ;
  553.  
  554. (if (= @language "español")
  555.     (
  556.         (set #default-lang #spanish-lang)
  557.  
  558.         (set #bad-kick "Imprescindible SO 3.0 como mínimo para usar Visage.")
  559.  
  560.         (set #welcome
  561.             (cat
  562.             "\n\n\n¡Bienvenido al guión instalador de 'Visage'!\n\n"
  563.             "Este guión le permitirá instalar el programa "
  564.             "visualizador de imágenes 'Visage' en su Amiga.\n\n\n"
  565.             "Visage © 1995-98 de Magnus Holmgren."
  566.             )
  567.         )
  568.  
  569.         (set #install-parts "Por favor, elija qué partes desea instalar")
  570.  
  571.         (set #item-visage "Visage")
  572.  
  573.         (set #item-visage-guide "Visage.guide")
  574.  
  575.         (set #item-locale "Idiomas")
  576.  
  577.         (set #item-getmodeid "GetModeID")
  578.  
  579.         (set #item-kill "Kill")
  580.  
  581.         (set #item-makelink "MakeLink")
  582.  
  583.         (set #item-deletelink "DeleteLink")
  584.  
  585.         (set #item-unpackilbm "UnpackILBM")
  586.  
  587.         (set #install-parts-help
  588.             (cat
  589.                 "\n   Aquí usted puede elegir las diferentes partes de "
  590.                 "'Visage' que deben ser instaladas. A continuación, "
  591.                 "deberá seleccionar los detalles de la instalación "
  592.                 "(como el lugar donde los diferentes ficheros deben "
  593.                 "ser instalados p. ej.). Puede elegir qué elementos "
  594.                 "desea instalar o no de entre los siguientes:\n"
  595.                 "   * Visage: el programa visualizador de imágenes.\n"
  596.                 "   * Visage.guide: el manual, en formato AmigaGuide®.\n"
  597.                 "   * Idiomas: si instala un idioma, 'Visage' podrá utilizarlo.\n"
  598.                 "   * GetModeID: este programa muestra una petición de "
  599.                 "modos de pantalla para que se elija uno, e imprime el nº "
  600.                 "decimal que lo identifica.\n"
  601.                 "   * Kill: permite detener otro programa, enviando una señal "
  602.                 "\"break\": similar al comando Break del AmigaDOS.\n"
  603.                 "   * MakeLink: sustituto del comando MakeLink del AmigaDOS "
  604.                 "que soporta enlaces blandos ('soft links').\n"
  605.                 "   * DeleteLink: un clon del comando Delete del AmigaDOS "
  606.                 "que permite borrar también enlaces blandos sin un objetivo.\n"
  607.                 "   * UnpackILBM: descomprime los datos, o sea el cuerpo o "
  608.                 "bloque BODY, de la imagen IFF ILBM señalada.\n\n"
  609.                 "   Para más información sobre lo anterior, consulte el "
  610.                 "manual.\n"
  611.             )
  612.         )
  613.  
  614.         (set #where-visage "¿Dónde desearía instalar 'Visage'?\n(¡no se creará ningún cajón!)")
  615.  
  616.         (set #visage-020
  617.             (cat
  618.                 "Parece que dispone de un procesador 68020 o superior en su sistema... "
  619.                 "¿desea instalar una versión de 'Visage' optimizada?"
  620.             )
  621.         )
  622.  
  623.         (set #visage-000-only "Instalar sólo versión normal.")
  624.  
  625.         (set #visage-020-also "Instalar versión 68020 (como \"Visage_020\").")
  626.  
  627.         (set #visage-020-only "Instalar sólo versión 68020.")
  628.  
  629.         (set #visage-020-help
  630.             (cat
  631.                 "\n   Si posee un procesador 68020 o superior en su equipo, puede, "
  632.                 "si lo desea, instalar una versión de 'Visage' optimizada.  Puede "
  633.                 "elegir la instalación de la versión normal únicamente, la "
  634.                 "instalación de ambas denominándose la específica de CPU 020 "
  635.                 "'Visage_020', o sólo la versión específica de CPU 020 (en este "
  636.                 "caso se llamaría sólo 'Visage').\n"
  637.                 "   Por favor, tenga en cuenta que la versión 020 no funcionará "
  638.                 "en equipos con CPU 68000 o 68010: si lo intenta ejecutar con "
  639.                 "alguno de estos procesadores el programa simplemente se limitará a "
  640.                 "volver al sistema silenciosamente (sin ningún tipo de aviso "
  641.                 "o mensaje)."
  642.             )
  643.         )
  644.  
  645.         (set #visage-make-020 "Creando versión 68020 de 'Visage'...")
  646.  
  647.         (set #where-visage-guide "¿Dónde desea instalar 'Visage.guide'?")
  648.  
  649.         (set #copy-guide-icon "¿Se debe copiar el icono para 'Visage.guide'?")
  650.  
  651.         (set #which-language "¿Qué idioma(s) se debe(n) instalar en su sistema?")
  652.  
  653.         (set #which-language-help
  654.             (cat
  655.                 "\n   El Amiga puede trabajar con diferentes idiomas, así que "
  656.                 "si desea que 'Visage' pueda emplear el mismo definido para su "
  657.                 "Workbench, tendrán que ser copiados los catálogos "
  658.                 "que correspondan a su disco duro (uno por cada "
  659.                 "lengua que desee soportar).\n\n"
  660.                 "    Para reducir la cantidad de espacio consumido por estos "
  661.                 "ficheros idiomáticos, puede seleccionar únicamente los de "
  662.                 "los idiomas que desee instalar, bastando para ello que sólo "
  663.                 "active el botón de verificación de aquellos de los que quiera "
  664.                 "disponer en su sistema.\n"
  665.             )
  666.         )
  667.  
  668.         (set #where-language
  669.             (cat
  670.                 "¿Dónde desea instalar los catálogos?\n\n"
  671.                 "Puede instalar éstos dentro del mismo cajón que el programa "
  672.                 "(en este caso, presione el botón \"Programa\") o en el "
  673.                 "volumen 'global' \"Locale:\" (en este caso, presione "
  674.                 "el botón \"Locale:\")."
  675.             )
  676.         )
  677.  
  678.         (set #lang-progdir "Programa")
  679.  
  680.         (set #lang-locale  "Locale:")
  681.  
  682.         (set #where-language-help
  683.             (cat
  684.                 "\n   Si instala los catálogos en el mismo cajón que el propio 'Visage' "
  685.                 "(o mejor dicho, en subdirectorios que dependen de este cajón), deberá "
  686.                 "mover esos ficheros si decide mover el programa 'Visage' a otro cajón. "
  687.                 "Si instala los ficheros en el volumen \"Locale:\", no deberá preocuparse "
  688.                 "de este tema si moviese el programa 'Visage', aunque por otro lado "
  689.                 "no tendrá todos los ficheros relacionados con el programa en el mismo cajón."
  690.             )
  691.         )
  692.  
  693.         (set #builtin-lang "(por defecto)")
  694.  
  695.         (set #where-tools "¿Dónde desea instalar los programas extra?")
  696.  
  697.         (set #where-tools-help
  698.             (cat
  699.                 "\n   Aquí ha de especificar cuál(es) de los programas "
  700.                 "(GetModeID, Kill, MakeLink, DeleteLink y UnpackILBM) "
  701.                 "desea instalar: sólo los programas que usted seleccione "
  702.                 "serán copiados. Como estas utilidades son para utilizar "
  703.                 "únicamente desde el Shell, el destino por defecto "
  704.                 "es 'C:', que es el lugar habitual donde encontrar "
  705.                 "este tipo de programas.\n\n"
  706.                 "   Es recomendable que instale estos programas en algún "
  707.                 "lugar accesible por el sistema de forma automática (use "
  708.                 "en tal caso el comando Path del AmigaDOS).\n"
  709.             )
  710.         )
  711.  
  712.         (set #copy "Copiando %s a %s...")
  713.  
  714.         (set #program-update "¿Cómo desea actualizar los tipos de herramienta del icono?")
  715.  
  716.         (set #update-none "No actualizar")
  717.  
  718.         (set #update-all "Añadir todo")
  719.  
  720.         (set #update-since "Añadir nuevo(s) desde %s")
  721.  
  722.         (set #program-update-help
  723.             (cat
  724.                 "\n   Desde esta actualización de la instalación en "
  725.                 "una versión antigua de Visage, el icono no será "
  726.                 "copiado encima: esto mantiene cualquier cambio que "
  727.                 "hubiese hecho usted en él. Sin embargo, nuevos tipos "
  728.                 "de herramienta pueden haber sido añadidos, así "
  729.                 "que aquí ha de decidir lo que desea hacer:\n"
  730.                 "   No actualizar: salta esta parte.\n"
  731.                 "   Añadir todos los tipos de herramienta: los tipos de "
  732.                 "herramienta existentes no se modifican y cualquiera "
  733.                 "que usted haya podido eliminar será añadido de nuevo. "
  734.                 "Los nuevos tipos de herramienta serán añadidos sin problemas.\n"
  735.                 "   Añadir nuevo hasta 39.x: sólo añade los nuevos "
  736.                 "tipos de herramienta hasta esa versión (cualquier tipo "
  737.                 "de herramienta existente no será modificado).\n"
  738.             )
  739.         )
  740.     )
  741. )
  742.  
  743.  
  744. ;**************************************************************************
  745. ;
  746. ; French strings
  747. ;
  748.  
  749. (if (= @language "francais")
  750.     (
  751.         (set #default-lang #french-lang)
  752.  
  753.         (set #bad-kick
  754.             (cat
  755.                 "Vous devez avoir la version 3.0 d'AmigaOS ou plus récente "
  756.                 "pour utiliser Visage."
  757.             )
  758.         )
  759.  
  760.         (set #welcome
  761.             (cat
  762.                 "\n\n\nBienvenue dans l'utilitaire d'installation de Visage.\n\n"
  763.                 "Ce programme vous permet d'installer Visage sur votre Amiga.\n\n\n"
  764.                 "Visage © 1995-98  Magnus Holmgren."
  765.             )
  766.         )
  767.  
  768.         (set #install-parts "Sélectionnez les éléments que vous désirez installer S.V.P. :")
  769.  
  770.         (set #item-visage "Visage")
  771.  
  772.         (set #item-visage-guide "Visage.guide")
  773.  
  774.         (set #item-locale "Traductions")
  775.  
  776.         (set #item-getmodeid "GetModeID")
  777.  
  778.         (set #item-kill "Kill")
  779.  
  780.         (set #item-makelink "MakeLink")
  781.  
  782.         (set #item-deletelink "DeleteLink")
  783.  
  784.         (set #item-unpackilbm "UnpackILBM")
  785.  
  786.         (set #install-parts-help
  787.             (cat
  788.                 "   Ici vous sélectionnez les différentes parties de Visage que "
  789.                 "vous désirez installer. Ensuite, vous sélectionnez les détails "
  790.                 "de l'installation (tel que l'endroit où les différents fichiers "
  791.                 "devront être installés). Vous pouvez choisir d'installer les "
  792.                 "éléments suivants :\n"
  793.                 "    Visage : l'afficheur d'image actuel.\n"
  794.                 "    Visage.guide : le manuel, de format AmigaGuide®. Si vous "
  795.                 "l'installez en utilisant installer, Le texte sera remis en forme "
  796.                 "afin d'être adapté à la taille de la fenêtre courante. Si vous "
  797.                 "faîtes une installation manuelle, Le texte sera fixé à 76 colonnes.\n"
  798.                 "    Traductions : si vous installez une traduction, alors Visage "
  799.                 "fonctionnera dans le(s) language(s) sélectionné(s).\n"
  800.                 "    GetModeID : un programme qui affiche une requête de mode "
  801.                 "d'affichage, et retourne un nombre décimal qui représente le mode "
  802.                 "d'affichage sélectionné.\n"
  803.                 "    Kill : un programme qui peut stopper un autre programme "
  804.                 "(en envoyant un signal « break »). Similaire à Break.\n"
  805.                 "    MakeLink : en remplacement de la commande MakeLink et qui "
  806.                 "supporte les liens symboliques.\n"
  807.                 "    DeleteLink : un clône de la commande Delete qui efface "
  808.                 "également les liens symboliques sans destination.\n"
  809.                 "    UnpackILBM : un programme qui décompacte les données d'une "
  810.                 "images (le BODY chunk) dans un fichier au format IFF ILBM.\n"
  811.                 "    Pour plus d'information sur cette partie, lisez le manuel "
  812.                 "S.V.P..\n"
  813.             )
  814.         )
  815.  
  816.         (set #where-visage
  817.             (cat
  818.                 "Où désirez vous installer Visage ?\n"
  819.                 "AUCUN répertoire ne sera créé !"
  820.             )
  821.         )
  822.  
  823.         (set #where-visage-guide "Où désirez vous installer Visage.guide ?")
  824.  
  825.         (set #copy-guide-icon "L'icône de Visage.guide doit-il être copié ?")
  826.  
  827.         (set #which-language "Quelle(s) langue(s) faut-il installer ?")
  828.  
  829.         (set #which-language-help
  830.             (cat
  831.                 "    L'Amiga peut utiliser différentes langues. Si vous voulez que"
  832.                 "Visage utilise la même langue que le Workbench de votre Amiga, "
  833.                 "alors un certain nombre de fichiers « catalog » doivent être copiés "
  834.                 "sur votre disque dur pour chaque langue supportée.\n"
  835.                 "    Afin de réduire la place utilisée par les fichiers de langues, "
  836.                 "vous pouvez ne sélectionner que les fichiers en rapport avec la "
  837.                 "langue utilisée.\n"
  838.                 "    Vérifiez simplement les options de langues que vous désirez "
  839.                 "voir disponible sur votre système.\n"
  840.             )
  841.         )
  842.  
  843.         (set #where-language
  844.             (cat
  845.                 "Où voulez-vous installer les fichiers de langues ?\n\n"
  846.                 "Vous pouvez les installer dans le même répertoire que le "
  847.                 "programme lui-même (sélectionner « Programme ») ou bien dans "
  848.                 "« Locale: » (sélectionner « Locale: ») dans le volume principal."
  849.             )
  850.         )
  851.  
  852.         (set #lang-progdir "Programme")
  853.  
  854.         (set #lang-locale  "Locale:")
  855.  
  856.         (set #where-language-help
  857.             (cat
  858.                 "    Si vous installez les fichiers de langues dans le même "
  859.                 "répertoire que Visage (ou plutôt dans un sous répertoire de "
  860.                 "celui-ci), alors vous devrez également déplacer ces fichiers si "
  861.                 "vous déplacez Visage dans un autre répertoire. Si vous installez "
  862.                 "les fichiers de langues dans « Locale: », vous n'aurez pas besoin "
  863.                 "de vous en préoccuper si vous déplacer Visage. Par contre vous "
  864.                 "n'aurez pas tous les fichiers relatifs à Visage dans le même "
  865.                 "répertoire."
  866.             )
  867.         )
  868.  
  869.         (set #builtin-lang "(default)")
  870.  
  871.         (set #where-tools "Où désirez-vous installer les utilitaires supplémentaires ? ")
  872.  
  873.         (set #where-tools-help
  874.             (cat
  875.                 "    Vous spécifiez ici où doivent être installés les programmes "
  876.                 "GetModeID, Kill, MakeLink, DeleteLink et UnpackILBM. Seuls les "
  877.                 "programmes que vous avez sélectionnés seront installés. Comme ces "
  878.                 "programmes ne sont exécutables que sous Shell, l'emplacement par "
  879.                 "défaut est C: , là où se trouve tous les programmes qui ne peuvent "
  880.                 "s'exécuter que sous shell.\n"
  881.                 "    Il est recommandé d'installer ces programmes dans un endroit "
  882.                 "dont le chemin est connu du système.\n"
  883.             )
  884.         )
  885.  
  886.         (set #copy "Copie de %s vers %s...")
  887.  
  888.         (set #program-update
  889.             (cat
  890.                 "Comment voulez-vous mettre à jour les paramètres d'outil "
  891.                 "(« ToolTypes ») de l'icône ?"
  892.             )
  893.         )
  894.  
  895.         (set #update-none "Pas de mise à jour")
  896.  
  897.         (set #update-all "Tout ajouter")
  898.  
  899.         (set #update-since "Ajouter les nouveaux depuis la V %s")
  900.  
  901.         (set #program-update-help
  902.             (cat
  903.                 "    Comme cette installation met à jour une ancienne version de "
  904.                 "Visage, l'icône d'origine ne sera pas écrasé afin de préserver "
  905.                 "les modifications que vous pourriez avoir apportées. Sinon, de "
  906.                 "nouveaux paramètres d'outil pourrait être ajoutés. Ici vous "
  907.                 "pouvez décider si vous voulez :\n"
  908.                 "    Pas de mise à jour : passer cette partie.\n"
  909.                 "    Ajouter tous les paramètres d'outil : ceux existants ne "
  910.                 "seront pas modifiés. Tous les paramètres d'outil que vous "
  911.                 "pourriez avoir retirés seront rajoutés. "
  912.                 "Les nouveaux paramètres d'outil seront également rajoutés.\n "
  913.                 "    Ajouter les nouveaux depuis la version 39.x : ajouter "
  914.                 "seulement les nouveaux paramètres d'outil depuis cette version. "
  915.                 "Aucun paramètre d'outil existant ne sera modifié.\n"
  916.             )
  917.         )
  918.     )
  919. )
  920.  
  921.  
  922. ;**************************************************************************
  923. ;
  924. ; Italian strings
  925. ;
  926.  
  927. (if (= @language "italiano")
  928.     (
  929.         (set #default-lang #italian-lang)
  930.     )
  931. )
  932.  
  933.  
  934. ;**************************************************************************
  935. ;
  936. ; Dutch strings
  937. ;
  938.  
  939. (if (= @language "nederlands")
  940.     (
  941.         (set #default-lang #dutch-lang)
  942.     )
  943. )
  944.  
  945.  
  946. ;**************************************************************************
  947. ;
  948. ; Norwegian strings
  949. ;
  950.  
  951. (if (= @language "norsk")
  952.     (
  953.         (set #default-lang #norwegian-lang)
  954.     )
  955. )
  956.  
  957.  
  958. ;**************************************************************************
  959. ;
  960. ; Russian strings
  961. ;
  962.  
  963. (if (= @language "russian")
  964.     (
  965.         (set default-lang #russian-lang)
  966.  
  967.         (set #welcome
  968.             (cat
  969.                 "\n\n\nÃíàïí îíåaêíáañû á çìðñaêþñíï îïíâïaëëú Visage.\n\n"
  970.                 "Üña îïíâïaëëa îíæáíêçñ Áaë òðñaìíáçñû Visage ìa Áaøò Aëçâò.\n\n\n"
  971.                 "Visage © 1995-98  Magnus Holmgren."
  972.             )
  973.         )
  974.  
  975.         (set #install-parts
  976.             "Îíåaêòèðña, áúàäïçñä éíëîíìäìñú, éíñíïúä Áú åäêaäñä çìðñaêçïíáañû"
  977.         )
  978.  
  979.         (set #item-visage "Visage")
  980.  
  981.         (set #item-visage-guide "Visage.guide")
  982.  
  983.         (set #item-locale "Translations")
  984.  
  985.         (set #item-getmodeid "GetModeID")
  986.  
  987.         (set #item-kill "Kill")
  988.  
  989.         (set #item-makelink "MakeLink")
  990.  
  991.         (set #item-unpackilbm "UnpackILBM")
  992.  
  993.         (set #install-parts-help
  994.             (cat
  995.                 "    Æãäðû Áú ëíåäñä áúàïañû ïaæêçöìúä éíëîíìäìñú Visage ãêþ áíæëíåìíè çô "
  996.                 "çìðñaêþõçç. Îíðêä üñíâí Áú ðëíåäñä òñíöìçñû ïaæêçöìúä ãäñaêç (ìaîïçëäï, "
  997.                 "éòãa éíìéïäñìí àòãòñ ðéíîçïíáaìú ïaæêçöìúä óaèêú). Áú ëíåäñä áúàïañû "
  998.                 "ðêäãòýùçä óaèêú:\n"
  999.                 "    Visage: ðíàðñáäììí îïíâïaëëa îïíðëíñïa éaïñçìíé.\n"
  1000.                 "    Visage.guide: ãíéòëäìñaõçþ á âçã-óíïëañä. Äðêç Áú æaôíñçñä ä½ òðñaìíáçñû "
  1001.                 "ð çðîíêûæíáaìçäë çìðñaêþñíïa, ñí ñäéðñ àòãäñ aáñíëañçöäðéç óíïëañçïíáañûðþ "
  1002.                 "îíã ñäéòùòý øçïçìò íéìa. Á ðêòöaä "ïòöìíè" çìðñaêþõçç  øçïçìa àòãäñ 76 éíêíìíé.\n"
  1003.                 "    Translations: îïç çìðñaêþõçç îäïäaíãíá Visage àòãäñ ïaàíñañû "
  1004.                 "ìa áúàïaììíë Áaëç þæúéä (þæúéaô).\n"
  1005.                 "    GetModeID: îïíâïaëëa, îíéaæúáaýùaþ ïçéáäðñäï üéïaììúô ïäåçëíá ç îäöañaýùaþ "
  1006.                 "ãäðþñçöìíä öçðêí, ðííñáäñðñáòýùää áúàïaììíëò ïäåçëò.\n"
  1007.                 "    Kill: îïíâïaëëa, éíñíïaþ ëíåäñ îïäïáañû çðîíêìäìçä ãïòâçô îïíâïaëë, îíðêaá "
  1008.                 "çë ðçâìaê íðñaìíáa (îïçëäïìí ñí åä, öñí ç  Break.)\n"
  1009.                 "    MakeLink: æaëäìa ðñaìãaïñìíè éíëaìãú, îíããäïåçáaýùaþ \"ðêaàúä\" "
  1010.                 "ðáþæç.\n"
  1011.                 "    DeleteLink: A simple Delete-clone that also deletes soft links "
  1012.                 "without a target.\n"
  1013.                 "    UnpackILBM: ïaðîaéíáúáaäñ \"ñäêí\" IFF ILBM óaèêíá "
  1014.                 "(BODY chunk).\n"
  1015.                 "    Àíêää îíãïíàìòý çìóíïëaõçý ðë. á ãíéòëäìñaõçç é îïíâïaëëä.\n"
  1016.             )
  1017.         )
  1018.  
  1019.         (set #where-visage "Òéaåçñä ëaïøïòñ ãêþ çìðñaêþõçç Visage")
  1020.  
  1021.         (set #where-visage-guide "Éòãa éíîçïíáañû óaèê ãíéòëäìñaõçç Visage.guide?")
  1022.  
  1023.         (set #copy-guide-icon "Ìaãí êç éíîçïíáañû çéíìéò ãêþ Visage.guide?")
  1024.  
  1025.         (set #which-language "Éaéçä þæúéç ìaãí çìðñaêçïíáañû?")
  1026.  
  1027.         (set #which-language-help
  1028.             (cat
  1029.                 "    Aëçâa ëíåäñ ïaàíñañû ìa ëìíâçô þæúéaô. Äðêç Áú ôíñçñä, öñíàú "
  1030.                 "Visage çðîíêûæíáaê ðñaìãaïñìúè þæúé Áaøäè ðçðñäëú, ñí ìäíàôíãçëí "
  1031.                 "ðéíîçïíáañû ðííñáäñðñáòýùçä éañaêíâç ìa Áaø å½ðñéçè ãçðé - îííãìíëò "
  1032.                 "ãêþ éaåãíâí çæ çðîíêûæòäëúô þæúéíá.\n"
  1033.                 "    Öñíàú òëäìûøçñû íàÿ½ë, æaìçëaäëúè þæúéíáúëç éañaêíâaëç, "
  1034.                 "áú ëíåäñä ìä áúàçïañû éañaêíâç ãêþ ñäô þæúéíá, éíñíïúä Áaë á îïçìõçîä "
  1035.                 "ìä îíñïäàòýñðþ.\n"
  1036.                 "    Îïíðñí îíðñaáûñä âaêíöéç ìaîïíñçá ñïäàòäëúô Áaë þæúéíá ç áð½.\n "
  1037.             )
  1038.         )
  1039.  
  1040.         (set #where-tools "Éòãa çìðñaêçïíáañû ãíîíêìçñäêûìúä îïíâïaëëú?")
  1041.  
  1042.         (set #where-tools-help
  1043.             (cat
  1044.                 "    Òéaåçñä ëaïøïòñ éíîçïíáaìçþ îïíâïaëë GetModeID, Kill, MakeLink, "
  1045.                 "DeleteLink ç UnpackILBM. Àòãòñ ðéíîçïíáaìú ñíêûéí áúàïaììúä Áaëç "
  1046.                 "îïíâïaëëú. Îíðéíêûéò æaîòðéañû áðä üñç îïíâïaëëú áíæëíåìí ñíêûéí çæ "
  1047.                 "Shell, ñí îïäãîíêaâaäñðþ ðéíîçïíáañû çô á C:, âãä, éaé îïaáçêí, "
  1048.                 "ìaôíãþñðþ îíãíàìúä îïíâïaëëú.\n"
  1049.                 "    Á êýàíë ðêòöaä åäêañäêûìí, öñíàú üñç îïíâïaëëú ìaôíãçêçðû îí íãìíëò "
  1050.                 "çæ ãíðñòîìúô ëaïøïòñíá Áaøäè ðçðñäëú.\n"
  1051.             )
  1052.         )
  1053.  
  1054.         (set #copy "Éíîçïòý %s á %s...")
  1055.  
  1056.         (set #program-update "Éaé Áú ôíñçñä íàìíáçñû çìðñïòëäìñaïçè çéíìéç?")
  1057.  
  1058.         (set #update-none "Ìä ôíöò")
  1059.  
  1060.         (set #update-all "Ãíàaáçñû áð½")
  1061.  
  1062.         (set #update-since "Ãíàaáçñû, ìaöçìaþ ð %s")
  1063.  
  1064.         (set #program-update-help
  1065.             (cat
  1066.                 "    Îíðéíêûéò ëú ðäèöað íàìíáêþäë àíêää ðñaïòý áäïðçý Visage, ñí "
  1067.                 "ðñaïaþ çéíìéa ìä îäïäîçðúáaäñðþ æaìíáí. Üñí ðãäêaìí ãêþ ñíâí, öñíàú "
  1068.                 "ðíôïaìçñû ñä çæëäìäìçþ, éíñíïúä Áú ëíâêç îïíçæáäðñç ïaìää. Íãìaéí, "
  1069.                 "ìçöñí ìä ëäøaäñ ìaë ãíàaáçñû ìíáúä îaïaëäñïú. Æãäðû áú ëíåäñä "
  1070.                 "ïäøçñû, ôíñçñä êç Áú:\n"
  1071.                 "    Ìçöäâí ìä íàìíáêþñû.\n"
  1072.                 "    Ãíàaáçñû ìíáúä îaïaëäñïú é òåä ðòùäðñáòýùçë. "
  1073.                 "Êýàúä áíæëíåìí òãaê½ììúä Áaëç ïaìää îaïaëäñïú àòãòñ ðìíáa ãíàaáêäìú, "
  1074.                 "ïaáìí éaé ç ìíáúä îaïaëäñïú.\n "
  1075.                 "    Ãíàaáçñû îíðêä 39.x: ãíàaáçñû ìíáúä îaïaëäñïú ñíêûéí îíðêä üñíè áäïðçç ÃÍÐ. "
  1076.                 "Ðòùäðñáòýùçä îaïaëäñïú íðñaìòñðþ ìäçæëäììúëç.\n"
  1077.             )
  1078.         )
  1079.     )
  1080. )
  1081.  
  1082.  
  1083. ;**************************************************************************
  1084. ;
  1085. ; Serbian strings
  1086. ;
  1087.  
  1088. (if (= @language "srpski")
  1089.     (
  1090.         (set #default-lang #serbian-lang)
  1091.  
  1092.         (set #bad-kick
  1093.             "Morate imati AmigaOS verzija 3.0 ili noviji da bi koristili Visage."
  1094.         )
  1095.  
  1096.         (set #welcome
  1097.             (cat
  1098.                 "\n\n\nDobrodoãli u instalaciju Visage-a.\n\n"
  1099.                 "Ovaj program Vam omoguáava da instalirate Visage na Vaãoj Amigi.\n\n\n"
  1100.                 "Visage © 1995-98 Magnus Holmgren."
  1101.             )
  1102.         )
  1103.  
  1104.         (set #install-parts "Odaberite delove koje äelite da instalirate")
  1105.  
  1106.         (set #item-visage "Visage")
  1107.  
  1108.         (set #item-visage-guide "Visage.guide")
  1109.  
  1110.         (set #item-locale "Prevodi")
  1111.  
  1112.         (set #item-getmodeid "GetModeID")
  1113.  
  1114.         (set #item-kill "Kill")
  1115.  
  1116.         (set #item-makelink "MakeLink")
  1117.  
  1118.         (set #item-deletelink "DeleteLink")
  1119.  
  1120.         (set #item-unpackilbm "UnpackILBM")
  1121.  
  1122.         (set #install-parts-help
  1123.             (cat
  1124.                 "    Ovde birate razne delove Visage paketa koje äelite da instalirate "
  1125.                 "Posle toga odreâujete detalje instalacije (kao ãto je gde áe biti odreâeni"
  1126.                 "fajlovi biti instalirani). Za instalaciju moäete odabrati sledeáe "
  1127.                 "elemente:\n"
  1128.                 "    Visage: Sam program za gledanje slika.\n"
  1129.                 "    Visage.guide: Uputstvo, u AmigaGuide® formatu (na engleskom). Ako ga "
  1130.                 "ga instalirate uz pomoá ovog programa, tekst áe biti podeãen da ispunjava "
  1131.                 "trenutnu veliàinu prozora. Ako ga sami instalirate, tekst áe ostati ãirok "
  1132.                 "76 kolona.\n"
  1133.                 "    Prevodi: Ako instalirate prevod, onda áe Visage raditi na jeziku koji"
  1134.                 "ste odabrali.\n"
  1135.                 "    GetModeID: Program koji uz pomoá upitnika za mod ekrana, prikazuje "
  1136.                 "decimalni broj koji predstavlja odabrani mod ekrana.\n"
  1137.                 "    Kill: Program koji moäe da zaustavi druge programe (ãaljuái \"break\" "
  1138.                 "signale). Sliàan sistemskom Break-u.\n"
  1139.                 "    MakeLink: Zamena za MakeLink komandu koja podräava soft linkove.\n"
  1140.                 "    DeleteLink: Prost Delete klon koji briãe i soft linkove bez cilja.\n"
  1141.                 "    UnpackILBM: Program koji raspakuje podatke u IFF ILBM slici (tzv."
  1142.                 "BODY deo).\n"
  1143.                 "    Za viãe informacija o elementima paketa proàitajte uputstvo.\n"
  1144.             )
  1145.         )
  1146.  
  1147.         (set #where-visage "Gde äelite da instalirate Visage?\nDirektorijum NEÁE biti napravljen!")
  1148.  
  1149.         (set #visage-020
  1150.             (cat
  1151.                 "Izgleda da imate 68020 ili bolji procesor i ko-procesor na Vaãem "
  1152.                 "sistemu. Da li §elite da instalirate verziju Visage-a optimizovanu "
  1153.                 "za Vaã sistem?"
  1154.             )
  1155.         )
  1156.  
  1157.         (set #visage-000-only "Instaliraj samo normalnu verziju.")
  1158.  
  1159.         (set #visage-020-also "Instaliraj verziju za 68020 (kao \"Visage_020\").")
  1160.  
  1161.         (set #visage-020-only "Instaliraj samo verziju za 68020.")
  1162.  
  1163.         (set #visage-020-help
  1164.             (cat
  1165.                 "    Poãto imate instaliran 68020 ili bolji procesor i ko-procesor, "
  1166.                 "mo§ete ako §elite, da instalirate verziju Visage-a optimizovanu za Vaã "
  1167.                 "sistem. "
  1168.                 "    Mo§ete odabrati da instalirate samo normalnu verziju, verziju za "
  1169.                 "68020 pod imenom `Visage_020' kao dodatak normalnoj verziji, ili da "
  1170.                 "samo instalirate verziju za 68020 (kao `Visage').\n"
  1171.                 "    Morate znati da verzija za 68020 procesor neáe raditi sa 68000 "
  1172.                 "ili 68010 procesorima ili ako nemate ko-procesor. Verzija za 68020 "
  1173.                 "procesor jednostavno neáe raditi na takvim sistemima."
  1174.             )
  1175.         )
  1176.  
  1177.         (set #visage-make-020 "Kreiram verziju Visage-a za 68020...")
  1178.  
  1179.         (set #where-visage-guide "Gde äelite da instalirate Visage.guide?")
  1180.  
  1181.         (set #copy-guide-icon "Da li äelite da kopiram i ikonu za Visage.guide?")
  1182.  
  1183.         (set #which-language "Koje jezike äelite da instalirate?")
  1184.  
  1185.         (set #which-language-help
  1186.             (cat
  1187.                 "    Amiga moäe da radi na razliàitim jezicima. Ako äelite da "
  1188.                 "Visage koristi isti jezik kao Vaã Workbench, onda nekoliko "
  1189.                 "katalog fajlova mora biti kopirano na hard disk za svaki "
  1190.                 "podräani jezik.\n"
  1191.                 "    Da bi se smanjilo mesto potrebno kataloge, moäete odabrati "
  1192.                 "da se prekopiraju samo fajlovi odreâenog jezika.\n"
  1193.                 "    Samo obeleäite koje jezike äelite da imate na Vaãem sistemu.\n"
  1194.             )
  1195.         )
  1196.  
  1197.         (set #where-language
  1198.             (cat
  1199.                 "Gde äelite da instalirate katalog fajlove?\n\n"
  1200.                 "Moäete ih instalirati ili u isti direktorijum "
  1201.                 "gde je sam program (odaberite \"Program\") ili "
  1202.                 "u 'globalni' direktorijum \"Locale:\" (odaberite "
  1203.                 "\"Locale:\")."
  1204.             )
  1205.         )
  1206.  
  1207.         (set #lang-progdir "Program")
  1208.  
  1209.         (set #lang-locale  "Locale:")
  1210.  
  1211.         (set #where-language-help
  1212.             (cat
  1213.                 "    Ako instalirate katalog fajlove u isti direktorijum kao Visage "
  1214.                 "(tj, u poddirektorijume u tom direktorijumu), onda morate premeãtati "
  1215.                 "i te fajlove, ako premeãtate Visage u neki drugi direktorijum. Ako"
  1216.                 "instalirate katalog fajlove u \"Locale:\" ne morate da brinete o "
  1217.                 "tome gde se nalazi Visage. Sa druge strane sve fajlovi vezani za"
  1218.                 "Visage neáe biti u istom direktorijumu."
  1219.             )
  1220.         )
  1221.  
  1222.         (set #builtin-lang "(default)")
  1223.  
  1224.         (set #where-tools "Gde äelite da instalirate dodatne programe?")
  1225.  
  1226.         (set #where-tools-help
  1227.             (cat
  1228.                 "    Ovde birate gde áe se intalirati GetModeID, Kill, MakeLink, "
  1229.                 "DeleteLink and UnpackILBM. Samo programi koje ste odabrali biáe "
  1230.                 "instalirani. Poãto su ovo iskljuàivo ãel programi, normalno "
  1231.                 "odrediãte je C: direktorijum, gde se nalaze iskljuàivo ãel "
  1232.                 "programi.\n"
  1233.                 "    Preporuàeno je da programi budu instalirani negde gde ih "
  1234.                 "moäe naái AmigaDOS (u tzv. putanji).\n"
  1235.             )
  1236.         )
  1237.  
  1238.         (set #copy "Kopiram %s u %s...")
  1239.  
  1240.         (set #program-update "Kako äelite da dodate opcije ikone?")
  1241.  
  1242.         (set #update-none "Bez dodavanja")
  1243.  
  1244.         (set #update-all "Dodaj sve")
  1245.  
  1246.         (set #update-since "Dodaj nove od %s")
  1247.  
  1248.         (set #program-update-help
  1249.             (cat
  1250.                 "    Poãto ova skripta osveäava prethodne verzije Visage-a, nova "
  1251.                 "ikona neáe biti kopirana preko stare. Tako áe biti saàuvane "
  1252.                 "promene koje ste moäda napravili. Meâutim, moäda su dodate nove "
  1253.                 "opcije ikone. Ovde moäete odabrati naàin dodavavanja:\n"
  1254.                 "    Bez dodavanja: Preskoài ovaj deo.\n"
  1255.                 "    Dodaj sve: postojeáe opcije ikone neáe biti promenjene. Ako "
  1256.                 "ste obrisali neke opcije ikone one áe ponovo biti dodate kao i "
  1257.                 "nove.\n "
  1258.                 "    Dodaj nove od 39.x: Dodaje nove opcije ikone od odabrane "
  1259.                 "verzije. "
  1260.                 "Svi postojeáe opcije ikone neáe biti promenjene.\n"
  1261.             )
  1262.         )
  1263.     )
  1264. )
  1265.  
  1266.  
  1267. ;**************************************************************************
  1268. ;
  1269. ; Finnish strings
  1270. ;
  1271.  
  1272. (if (= @language "suomi")
  1273.     (
  1274.         (set #default-lang #finnish-lang)
  1275.  
  1276.         (set #bad-kick
  1277.             "Tarvitset AmigaOS-version 3.0 tai uudemman käyttääksesi Visagea."
  1278.         )
  1279.  
  1280.         (set #welcome
  1281.             (cat
  1282.                 "\n\n\nTervetuloa Visagen asennusohjelmaan.\n\n"
  1283.                 "Tämä ohjelma asentaa Visagen Amigaasi.\n\n\n"
  1284.                 "Visage © 1995-98  Magnus Holmgren."
  1285.             )
  1286.         )
  1287.  
  1288.         (set #install-parts "Valitse osat, jotka haluat asentaa:")
  1289.  
  1290.         (set #item-visage "Visage")
  1291.  
  1292.         (set #item-visage-guide "Visage.guide")
  1293.  
  1294.         (set #item-locale "Käännökset")
  1295.  
  1296.         (set #install-parts-help
  1297.             (cat
  1298.                 "    Tässä valitset ne osat Visagesta, jotka haluat asentaa. Sen jälkeen "
  1299.                 "määrität asennuksen yksityiskohdat (kuten mihin eri tiedostot asennetaan). "
  1300.                 "Voit valita asennettavaksi seuraavat osat:\n"
  1301.                 "    Visage: Varsinainen kuvannäyttöohjelma.\n"
  1302.                 "    Visage.guide: Ohjetiedosto AmigaGuide® -muodossa. Jos asennat tämän "
  1303.                 "asennusohjelmalla, teksti sovitetaan mahtumaan nykyisen ikkunan leveyteen. "
  1304.                 "Jos asennat ohjeet itse, teksti on sidottu 76 merkin leveyteen.\n"
  1305.                 "    Käännökset: Jos asennat käännökset, Visage voi toimia käyttäen "
  1306.                 "valitsemiasi kieliä.\n"
  1307.                 "    GetModeID: Ohjelma, joka avaa näyttötilavalitsimen ja tulostaa "
  1308.                 "valitun näyttötilan tunnuksen desimaalilukuna.\n"
  1309.                 "    Kill: Ohjelma, joka voi pysäyttää toisia ohjelmia (lähettämällä "
  1310.                 "\"keskeytys\"-signaaleja). Toimii kuten Break-komento.\n"
  1311.                 "    MakeLink: Korvaava komento MakeLinkille, joka tukee myös "
  1312.                 "symbolisia (soft) linkkejä.\n"
  1313.                 "    DeleteLink: Yksinkertainen Delete-klooni, joka poistaa myös ilman "
  1314.                 "kohdetiedostoa olevia symbolisia (soft) linkkejä.\n"
  1315.                 "    UnpackILBM: Ohjelma, joka purkaa kuvatiedon IFF ILBM -kuvasta "
  1316.                 "(BODY-hunkin).\n"
  1317.                 "    Lisätietoja näistä osista saat lukemalla ohjetiedoston.\n"
  1318.             )
  1319.         )
  1320.  
  1321.         (set #where-visage "Mihin haluat asentaa Visagen?\nUutta hakemistoa EI luoda!")
  1322.  
  1323.         (set #where-visage-guide "Mihin haluat asentaa ohjetiedoston Visage.guide?")
  1324.  
  1325.         (set #copy-guide-icon "Kopioidaanko ikoni tiedostolle Visage.guide?")
  1326.  
  1327.         (set #which-language "Mitkä kielitiedostot asennetaan?")
  1328.  
  1329.         (set #which-language-help
  1330.             (cat
  1331.                 "    Amigaa voidaan käyttää monilla kielillä. Jos haluat Visagen "
  1332.                 "käyttävän samaa kieltä kuin Workbench, muutama sanasto joudutaan "
  1333.                 "kopioimaan kiintolevyllesi jokaista tuettua kieltä kohden.\n"
  1334.                 "    Vähentääksesi kielitiedostojen vaatimaa levytilaa, voit valita "
  1335.                 "asennettavaksi vain tiettyjen kielten tiedostot.\n"
  1336.                 "    Merkitse laatikot niiden kielten kohdalla, joiden haluat "
  1337.                 "olevan käytettävissä järjestelmässäsi.\n"
  1338.             )
  1339.         )
  1340.  
  1341.         (set #where-language
  1342.             (cat
  1343.                 "Mihin haluat asentaa kielitiedostot?\n\n"
  1344.                 "Voit asentaa ne joko samaan hakemistoon ohjelman kanssa "
  1345.                 "(valitse \"Ohjelma\") tai 'yleiseen' taltioon "
  1346.                 "\"Locale:\" (valitse \"Locale:\")."
  1347.             )
  1348.         )
  1349.  
  1350.         (set #lang-progdir "Ohjelma")
  1351.  
  1352.         (set #lang-locale  "Locale:")
  1353.  
  1354.         (set #where-language-help
  1355.             (cat
  1356.                 "    Jos asennat kielitiedostot samaan hakemistoon kuin Visagen "
  1357.                 "(tai paremminkin tuon hakemiston alihakemistoon), joudut "
  1358.                 "siirtämään myös nämä tiedostot, mikäli siirrät Visagen johonkin "
  1359.                 "toiseen hakemistoon. Jos asennat kielitiedostot taltioon "
  1360.                 "\"Locale:\", sinun ei tarvitse välittää niistä siirtäessäsi "
  1361.                 "Visagen. Toisaalta sinulla ei silloin ole kaikkia Visageen "
  1362.                 "liittyviä tiedostoja kätevästi samassa hakemistossa."
  1363.             )
  1364.         )
  1365.  
  1366.         (set #builtin-lang "(oletus)")
  1367.  
  1368.         (set #where-tools "Mihin haluat asentaa apuohjelmat?")
  1369.  
  1370.         (set #where-tools-help
  1371.             (cat
  1372.                 "    Tässä määrität, mihin ohjelmat GetModeID, Kill, MakeLink, "
  1373.                 "DeleteLink ja UnpackILBM asennetaan. Vain valitsemasi ohjelmat "
  1374.                 "asennetaan. Koska nämä ohjelmat voi käynnistää vain komentotulkista, "
  1375.                 "oletuspaikka on taltio C:, jossa järjestelmän komentotulkista "
  1376.                 "käynnistettävät ohjelmat ovat.\n"
  1377.                 "    On suositeltavaa, että asennat nämä ohjelmat johonkin komentojen "
  1378.                 "hakupolun varrella olevaan hakemistoon.\n"
  1379.             )
  1380.         )
  1381.  
  1382.         (set #copy "Kopioidaan %s nimelle %s...")
  1383.  
  1384.         (set #program-update "Miten haluat päivittää ikonin määreet?")
  1385.  
  1386.         (set #update-none "Älä päivitä")
  1387.  
  1388.         (set #update-all "Lisää kaikki")
  1389.  
  1390.         (set #update-since "Lisää uudet version %s jälkeen")
  1391.  
  1392.         (set #program-update-help
  1393.             (cat
  1394.                 "    Koska tämä asennus päivittää Visagen vanhemman version, "
  1395.                 "ikonia ei kopioida uudelleen. Tämä säilyttää siihen mahdollisesti "
  1396.                 "tekemäsi muutokset. Uusia määreitä on kuitenkin ehkä lisätty. "
  1397.                 "Tässä voit päättää, mitä haluat tehdä:\n"
  1398.                 "    Älä päivitä: Ohita tämä osa asennuksesta.\n"
  1399.                 "    Lisää kaikki määreet: Olemassa olevia määreitä ei muuteta. "
  1400.                 "Kaikki poistamasi määreet lisätään uudelleen. Myös täysin uudet "
  1401.                 "määreet lisätään.\n"
  1402.                 "    Lisää uudet 39.x:n jälkeen: Lisää vain kyseisen version "
  1403.                 "jälkeen lisätyt määreet. Olemassa olevia määreitä ei muuteta.\n"
  1404.             )
  1405.         )
  1406.     )
  1407. )
  1408.  
  1409.  
  1410. ;**************************************************************************
  1411. ;
  1412. ; Swedish strings
  1413. ;
  1414.  
  1415. (if (= @language "svenska")
  1416.     (
  1417.         (set #default-lang #swedish-lang)
  1418.  
  1419.         (set #bad-kick
  1420.             "Du måste ha AmigaOS version 3.0 eller högre för att kunna använda Visage."
  1421.         )
  1422.  
  1423.         (set #welcome
  1424.             (cat
  1425.                 "\n\n\nVälkommen till Installeraren.\n\n"
  1426.                 "Det här programmet låter dig installera Visage i din Amiga.\n\n\n"
  1427.                 "Visage © 1995-98 av Magnus Holmgren."
  1428.             )
  1429.         )
  1430.  
  1431.         (set #install-parts "Välj de delar du vill installera")
  1432.  
  1433.         (set #item-visage "Visage")
  1434.  
  1435.         (set #item-visage-guide "Visage.guide")
  1436.  
  1437.         (set #item-locale "Översättningar")
  1438.  
  1439.         (set #install-parts-help
  1440.             (cat
  1441.                 "  Här väljer du de olika delar av Visage som du vill installera. "
  1442.                 "Efter det anger du detaljer om installationen (såsom var de olika "
  1443.                 "filerna ska installeras). Du kan välja mellan följande delar:\n"
  1444.                 "  Visage: Själva bildvisaren.\n"
  1445.                 "  Visage.guide: Manualen, i AmigaGuide®-format.\n"
  1446.                 "  Översättningar: Om du installerar en översättning, så kan "
  1447.                 "Visage använda det språket.\n"
  1448.                 "  GetModeID: Ett program som visar en skärmlägesväljare, och "
  1449.                 "sedan skriver ut ett decimalt tal som motsvarar det valda "
  1450.                 "skärmläget.\n"
  1451.                 "  Kill: Ett program som kan stoppa andra program (genom att "
  1452.                 "skicka \"break\"-signaler). Liknar Break.\n"
  1453.                 "  MakeLink: En erättning för MakeLink, som stödjer så kallade "
  1454.                 "mjuka länkar.\n"
  1455.                 "  DeleteLink: En enkel Delete-variant, som också kan radera "
  1456.                 "mjuka länkar där målfilen saknas.\n"
  1457.                 "  UnpackILBM: Ett program som packar upp bilddatan i en IFF ILBM "
  1458.                 "bild (BODY \"chunken\").\n"
  1459.                 "    För mer information om de här sakerna, se manualen.\n"
  1460.             )
  1461.         )
  1462.  
  1463.         (set #where-visage "Var vill du installera Visage?\nEn låda kommer INTE att skapas!")
  1464.  
  1465.         (set #visage-020
  1466.             (cat
  1467.                 "Du verkar ha en 68020 CPU eller bättre, med en fungerande "
  1468.                 "FPU, installerad i ditt system. Vill du installera en "
  1469.                 "version av Visage som är optimerad för ditt system?"
  1470.             )
  1471.         )
  1472.  
  1473.         (set #visage-000-only "Installera bara normal version.")
  1474.  
  1475.         (set #visage-020-also "Installera 68020-version (som \"Visage_020\").")
  1476.  
  1477.         (set #visage-020-only "Installera bara 68020-version.")
  1478.  
  1479.         (set #visage-020-help
  1480.             (cat
  1481.                 "  Eftersom du har en 68020 CPU eller bättre installerad, "
  1482.                 "med en FPU, kan du, om du vill, installera en version av "
  1483.                 "Visage som är optimerad för ditt system. Du kan välja att "
  1484.                 "bara installera den vanliga versionen; installera "
  1485.                 "68020-versionen som \"Visage_020\", utöver den vanliga "
  1486.                 "versionen; eller bara installera 68020-versionen (som "
  1487.                 "\"Visage\").\n"
  1488.                 "  Observera att 68020-versionen inte kommer att fungera med "
  1489.                 "en 68000 eller 68010 CPU. 68020-versionen kommer att avsluta "
  1490.                 "utan några meddelanden på sådana system."
  1491.             )
  1492.         )
  1493.  
  1494.         (set #visage-make-020 "Skapar 68020-versionen av Visage...")
  1495.  
  1496.         (set #where-visage-guide "Var vill du installera Visage.guide?")
  1497.  
  1498.         (set #copy-guide-icon "Ska jag kopiera ikonen för Visage.guide?")
  1499.  
  1500.         (set #which-language "Vilka språk ska installeras?")
  1501.  
  1502.         (set #which-language-help
  1503.             (cat
  1504.                 "  Amigan kan arbeta med flera olika språk. Om du vill att "
  1505.                 "Visage ska använda samma språk som Amiga Workbench så "
  1506.                 "måste en så kallad katalogfil kopieras till din systemdisk "
  1507.                 "för varje språk.\n"
  1508.                 "  För att minimera diskutrymmet för språkfiler kan du välja "
  1509.                 "att bara installera filerna för vissa språk.\n"
  1510.                 "  Markera bara rutorna för de språk du önskar installera i "
  1511.                 "din dator.\n"
  1512.             )
  1513.         )
  1514.  
  1515.         (set #where-language
  1516.             (cat
  1517.                 "Var vill du installera katalogfilerna?\n\n"
  1518.                 "Du kan antingen installera dem i samma låda som programmet "
  1519.                 "(välj \"Program\"), eller i den \"globala\" enheten "
  1520.                 "\"Locale:\" (välj \"Locale:\")."
  1521.             )
  1522.         )
  1523.  
  1524.         (set #lang-progdir "Program")
  1525.  
  1526.         (set #lang-locale  "Locale:")
  1527.  
  1528.         (set #where-language-help
  1529.             (cat
  1530.                 "  Om du installerar katalogfilerna i samma låda som "
  1531.                 "Visage (eller snarare i underlådor i den lådan), så "
  1532.                 "kommer du att behöva flytta de här filerna, om du "
  1533.                 "flyttar Visage till någon annan låda. Om du installerar "
  1534.                 "katalogfilerna i \"Locale:\" så behöver du inte bekymra "
  1535.                 "dig om dem ifall du flyttar Visage. Å andra sidan, alla "
  1536.                 "Visage-relaterade filer kommer inte att finnas i samma "
  1537.                 "låda."
  1538.             )
  1539.         )
  1540.  
  1541.         (set #builtin-lang "(inbyggt)")
  1542.  
  1543.         (set #where-tools "Var vill du installera de extra programmen?")
  1544.  
  1545.         (set #where-tools-help
  1546.             (cat
  1547.                 "  Här anger du var programmen GetModeID, Kill, MakeLink "
  1548.                 "DeleteLink och UnpackILBM ska installeras någonstans. Bara "
  1549.                 "de program som du valde tidigare kommer att kopieras. "
  1550.                 "Eftersom de här programmen bara kan användas från ett "
  1551.                 "skal, så är den förvalda destinationen C:, eftersom "
  1552.                 "systemets \"skalprogram\" finns där. Det rekommenderas "
  1553.                 "att du installerar dessa program någonstans i sökvägen "
  1554.                 "för kommandon.\n"
  1555.             )
  1556.         )
  1557.  
  1558.         (set #copy "Kopierar %s till %s...")
  1559.  
  1560.         (set #program-update "Hur vill du uppdatera verktygstyperna i ikonen?")
  1561.  
  1562.         (set #update-none "Uppdatera inte")
  1563.  
  1564.         (set #update-all "Lägg till alla")
  1565.  
  1566.         (set #update-since "Lägg till nya sedan %s")
  1567.  
  1568.         (set #program-update-help
  1569.             (cat
  1570.                 "  Eftersom den här installationen uppdaterar en gammal version "
  1571.                 "av Visage kommer inte ikonen att kopieras. Detta för att "
  1572.                 "bibehålla eventuella ändringar som du kan ha gjort. Men nya "
  1573.                 "verktygstyper kan ha tillkommit. Här kan du avgöra vad du "
  1574.                 "vill göra:\n"
  1575.                 "  Uppdatera inte: Hoppa över detta.\n"
  1576.                 "  Lägg till alla: Lägg till alla verktygstyper. Existerande "
  1577.                 "verktygstyper kommer inte att ändras.\n"
  1578.                 "  Lägg till nya sedan 39.x: Lägg bara till de nya "
  1579.                 "verktytstyperna. Eventuella existerande verktygstyper "
  1580.                 "kommer inte att ändras.\n"
  1581.             )
  1582.         )
  1583.     )
  1584. )
  1585.  
  1586.  
  1587. ;**************************************************************************
  1588. ;
  1589. ; Czech strings
  1590. ;
  1591.  
  1592. (if (= @language "ÃeÓtina")
  1593.     (
  1594.         (set #default-lang #czech-lang)
  1595.  
  1596.         (set #bad-kick
  1597.             "K tomu abyste mohli pouÚÉvat Visage potÒebujete AmigaOS 3.0 nebo vyÓÓÉ."
  1598.         )
  1599.  
  1600.         (set #welcome
  1601.             (cat
  1602.                 "\n\n\nVÉtejte pÒi instalaci programu Visage!\n\n"
  1603.                 "Visage © 1995-98 Magnus Holmgren."
  1604.             )
  1605.         )
  1606.  
  1607.         (set #install-parts "Volba ÃÁstÉ programu, kter× si pÒejete nainstalovat:")
  1608.  
  1609.         (set #item-locale "Lokalizace")
  1610.  
  1611.         (set #item-visage "Visage")
  1612.  
  1613.         (set #item-visage-guide "Visage.guide")
  1614.  
  1615.         (set #install-parts-help
  1616.             (cat
  1617.                 "    Zde mÊÚete zvolit, kter× ÃÁsti Visage si pÒejete nainstalovat. "
  1618.                 "Potom si zvolÉte detaily instalace (jako napÒ. kam se majÉ jednotliv× ÃÁsti "
  1619.                 "programu nainstalovat). Je moÚno zvolit z nÁsledujÉcÉch poloÚek:\n"
  1620.                 "    Visage: prohlÉÚeàobrÁzkÊ.\n"
  1621.                 "    Visage.guide: manuÁl, ve formÁtu AmigaGuide®. V pÒÉpadÅ, Úe si jej "
  1622.                 "nainstalujete pomocÉ t×to instalaÃnÉ utility, bude manuÁl pÒizpÊsoben "
  1623.                 "VaÓemu rozliÓenÉ. Pokud provÁdÉte instalaci sami, manuÁl zÊstane nezmÅnÅn "
  1624.                 "a bude mÉt standardnÉch 76 sloupcÊ.\n"
  1625.                 "    PÒeklady: V pÒÉpadÅ, Úe si nainstalujete pÒeklad, bude s VÁmi Visage "
  1626.                 "komunikovat ve VaÓem jazyce.\n"
  1627.                 "    GetModeID: Program, kterÙ ukÁÚe requester pro rozliÓovacÉ mÏdy, a vypÉÓe "
  1628.                 "dekadickou hodnotu pro dan× rozliÓenÉ.\n"
  1629.                 "    Kill: Program, kterÙ umoÚnÉ odstranit jin× programy (poÓle signÁl "
  1630.                 "\"break\" ). ChovÁ se tak podobnÅ jako Break.\n"
  1631.                 "    MakeLink: NÁhrada pro standardnÉ pÒÉkaz MakeLink. NavÉc podporuje "
  1632.                 "soft-linky.\n"
  1633.                 "    DeleteLink: JednoduchÙ klon pÒÉkazu Delete, kterÙ navÉc maÚe i soft-linky "
  1634.                 "bez urÃen×ho cÉlov×ho souboru.\n"
  1635.                 "    UnpackILBM: Program, kterÙ rozbalÉ data obrÁzku z klasick×ho amigovsk×ho "
  1636.                 "formÁtu pro obrÁzky - IFF ILBM. Data jsou v tzv. BODY chunku.\n"
  1637.                 "    DalÓÉ informace o tÅchto programech naleznete v manuÁlu.\n"
  1638.             )
  1639.         )
  1640.  
  1641.         (set #where-visage "Kam si pÒejete nainstalovat Visage?\nAdresÁÒ NEBUDE vytvoÒen!")
  1642.  
  1643.         (set #visage-020
  1644.             (cat
  1645.                 "VypadÁ to, Úe VÁÓ procesor je 68020 nebo lepÓÉ s FPU. "
  1646.                 "PÒejete si nainstalovat optimalizovanou verzi Visage?"
  1647.             )
  1648.         )
  1649.  
  1650.         (set #visage-000-only "Instalovat pouze normÁlnÉ verzi.")
  1651.  
  1652.         (set #visage-020-also "Instalovat verzi pro 68020 (s nÁzvem \"Visage_020\").")
  1653.  
  1654.         (set #visage-020-only "Instalovat pouze verzi pro 68020.")
  1655.  
  1656.         (set #visage-020-help
  1657.             (cat
  1658.                 "    ProtoÚe je VÁÓ procesor 68020 s FPU nebo lepÓÉ, mÊÚete si, "
  1659.                 "pokud si pÒejete, nainstalovat optimalizovanou verzi Visage. "
  1660.                 "MÊÚete si tedy zvolit nainstalovat pouze normÁlnÉ verzi, "
  1661.                 "normÁlnÉ verzi zÁroveΠs optimalizovanou (s nÁzvem `Visage_020' "
  1662.                 "nebo pouze optimalizovanou verzi (s nÁzvem `Visage').\n"
  1663.                 "    UvÅdomte si prosÉm, Úe optimalizovanÁ verze (pro 68020 nebo "
  1664.                 "vyÓÓÉ) nebude fungovat na 68000, 68010 nebo bez FPU. Na tÅchto "
  1665.                 "syst×mech prostÅ se prostÅ po spuÓtÅnÉ hned ukonÃÉ."
  1666.             )
  1667.         )
  1668.  
  1669.         (set #visage-make-020 "VytvÁÒÉ se verze Visage pro 68020...")
  1670.  
  1671.         (set #where-visage-guide "Kam si pÒejete nainstalovat Visage.guide?")
  1672.  
  1673.         (set #copy-guide-icon "MÁ se nakopÉrovat i ikona pro Visage.guide?")
  1674.  
  1675.         (set #which-language "Kter× jazyky si pÒejete nainstalovat?")
  1676.  
  1677.         (set #which-language-help
  1678.             (cat
  1679.                 "    OperaÃnÉ syst×m Amigy je moÚno provozovat v mnoha jazycÉch. "
  1680.                 "V pÒÉpadÅ, Úe si pÒejete, aby Visage komunikovala v jazyce, ve kter×m "
  1681.                 "pouÚÉvÁte VÁÓ Workbench, pak je nutn× nakopÉrovat nÅkolik souborÊ, "
  1682.                 "kter× se slouÚÉ k tomuto ÕÃelu.\n"
  1683.                 "    Aby lokalizaÃnÉ katalogy nezabÉraly pÒÉliÓ mÉsta na VaÓem harddisku "
  1684.                 "doporuÃuje se zvolit pouze ty jazyky, kter× si skuteÃnÅ pÒejete a "
  1685.                 "ovlÁdÁte.\n"
  1686.                 "    ProstÅ zatrhnÅte ta tlaÃÉtka, kterÁ oznaÃujÉ VÁmi poÚadovanÙ "
  1687.                 "jazyk. PÒÉsluÓn× soubory budou nakopÉrovÁny na VÁÓ syst×m.\n"
  1688.             )
  1689.         )
  1690.  
  1691.         (set #where-language
  1692.             (cat
  1693.                 "Kam si pÒejete nainstalovat lokalizaÃnÉ katalogy pro Visage?\n\n"
  1694.                 "PrvnÉ moÚnost je nainstalovat je do stejn×ho adresÁÒe jako program "
  1695.                 "samotnÙ (volba \"Program\") nebo v 'globÁlnÉm' pÒiÒazenÉ "
  1696.                 "\"Locale:\" (volba \"Locale:\")."
  1697.             )
  1698.         )
  1699.  
  1700.         (set #lang-progdir "Program")
  1701.  
  1702.         (set #lang-locale  "Locale:")
  1703.  
  1704.         (set #where-language-help
  1705.             (cat
  1706.                 "    JestliÚe si nainstalujete lokalizaÃnÉ soubory do stejn×ho adresÁÒe "
  1707.                 "jako Visage (nebo pÒesnÅji do podadresÁÒe tohoto adresÁÒe), pak je nutno "
  1708.                 "pÒi kaÚd×m pÒesunu tohoto adresÁÒe pÒesunout i tyto soubory. Pokud si "
  1709.                 "nainstalujete lokalizaÃnÉ soubory do \"Locale:\", nenÉ tÒeba se o nÅ dÁle "
  1710.                 "starat ani v pÒÉpadÅ, Úe adresÁÒ s Visage nÅkam pÒesunete. Na druhou "
  1711.                 "stranu ale nebudete mÉt vÓechny soubory tÙkajÉcÉ se Visage v jedin×m "
  1712.                 "adresÁÒi.\n"
  1713.             )
  1714.         )
  1715.  
  1716.         (set #builtin-lang "(standardnÉ)")
  1717.  
  1718.         (set #where-tools "Kam si pÒejete nainstalovat extra programy?")
  1719.  
  1720.         (set #where-tools-help
  1721.             (cat
  1722.                 "    Zde si mÊÚete zvolit kam se majÉ nainstalovat programy "
  1723.                 "GetModeID, Kill, MakeLink, DeleteLink a UnpackILBM. Pouze vybran× "
  1724.                 "programy budou nainstalovÁny. ProtoÚe jsou tyto programy urÃen× "
  1725.                 "pro pouÚitÉ v Shellu, budou standardnÅ umÉstÅny C:, kde jsou tak× "
  1726.                 "syst×mov× pÒÉkazy.\n"
  1727.                 "    Jinak se doporuÃuje tyto programy nainstalovat nÅkam do vyhledÁvacÉ "
  1728.                 "cesty.\n"
  1729.             )
  1730.         )
  1731.  
  1732.         (set #copy "ProbÉhÁ kopÉrovÁnÉ %s do %s...")
  1733.  
  1734.         (set #program-update "JakÙm zpÊsobem si pÒejete aktualizovat tooltypy v ikonÅ?")
  1735.  
  1736.         (set #update-none "Nic nemÅnit")
  1737.  
  1738.         (set #update-all "PÒidat vÓe")
  1739.  
  1740.         (set #update-since "PÒidat nov× od %s")
  1741.  
  1742.         (set #program-update-help
  1743.             (cat
  1744.                 "    PrestoÚe tato instalace aktualizuje dÒÉvÅjÓÉ verzi Visage, "
  1745.                 "pÊvodnÉ ikona nebude pÒepsÁna. Tento postup je zvolen z toho "
  1746.                 "dÊvodu, aby se vylouÃila ztrÁta vÓech zmÅn, kterÙmi jste si "
  1747.                 "Visage pÒizpÊsobili. Na druhou stranu byly v t×to nov× verzi "
  1748.                 "pÒidÁny nov× tooltypy. TakÚe mÁte na vybranou z nÅkolika moÚnostÉ:\n"
  1749.                 "    Nic nemÅnit: Nedojde k ÚÁdn× zmÅnÅ.\n"
  1750.                 "    PÒidat vÓechny tooltypy: stÁvajÉcÉ tooltypy nebudou zmÅnÅny "
  1751.                 "VÓechny tooltypy, kter× jste pÒÉpadnÅ uÚ dÒÉve odstranili, budou "
  1752.                 "znovu pÒidÁny. Nov× tooltypy budou pÒidÁny tak×.\n "
  1753.                 "    PÒidat nov× od 39.x: Budou pÒidÁny pouze nov× tooltypy od t×to "
  1754.                 "verze. StÁvajÉcÉ tooltypy nebudou zmÅnÅny.\n"
  1755.             )
  1756.         )
  1757.     )
  1758. )
  1759.  
  1760.  
  1761. ;**************************************************************************
  1762. ;
  1763. ; The actual installaion script
  1764. ;
  1765.  
  1766. ; Check Kickstart version. Exit if not at least 3.0
  1767. (if (< (/ (getversion) 65536) 39)
  1768.         (abort #bad-kick)
  1769. )
  1770.  
  1771. ; Since files probably are scatter installed, don't mention any specific location.
  1772. (set @default-dest "")
  1773.  
  1774. ; Version of old program. This means no old program.
  1775. (set #visagever 0)
  1776. (set #visagerev 0)
  1777.  
  1778. ; Request proportinal fonts, if supported. This string is
  1779. ; prepended to the first askoptions choice.
  1780. (if (>= @installer-version 2752518)     ; 42 * 65536 + 6
  1781.     ; At least version 42.6
  1782.     (set #propfont "p")
  1783.     ; Pre V42
  1784.     (set #propfont "")
  1785. )
  1786.  
  1787. ; Greetings Mr. Falken...
  1788. (message #welcome)
  1789.  
  1790. (welcome)
  1791.  
  1792. ; Ask the user what to install
  1793. (set #install-files
  1794.     (askoptions
  1795.         (prompt    #install-parts)
  1796.         (help    #install-parts-help "\n" @askoptions-help)
  1797.         (choices
  1798.             (cat #propfont #item-visage)
  1799.             #item-visage-guide
  1800.             #item-locale
  1801.             #item-getmodeid
  1802.             #item-kill
  1803.             #item-makelink
  1804.             #item-deletelink
  1805.             #item-unpackilbm
  1806.         )
  1807.         (default (if (= @user-level 2) 255 7))
  1808.     )
  1809. )
  1810.  
  1811. ; Ask the user for the location of all parts
  1812.  
  1813. ; Location for Visage
  1814. (if (BITAND #install-files 1)
  1815.     (
  1816.         (set #visage-dest
  1817.             (askdir
  1818.                 (prompt  #where-visage)
  1819.                 (help    @askdir-help)
  1820.                 (default "Sys:Utilities")
  1821.             )
  1822.         )
  1823.  
  1824.         ; Get the version of previously installed Visage
  1825.         (if (= (exists (tackon #visage-dest "Visage")) 1)
  1826.             (
  1827.                 (set #vernum (getversion (tackon #visage-dest "Visage")))
  1828.                 (set #visagever (/ #vernum 65536))
  1829.                 (set #visagerev (- #vernum (* #visagever 65536)))
  1830.  
  1831.                 ; Just in case the above failed...
  1832.                 (if (<= #visagever 38)
  1833.                     (
  1834.                         (set #visagever 39)
  1835.                         (set #visagerev 0)
  1836.                     )
  1837.                 )
  1838.             )
  1839.         )
  1840.  
  1841.         (set #update-action 0)
  1842.  
  1843.         (if (AND #visagever (= (exists (tackon #visage-dest "Visage.info")) 1))
  1844.             (
  1845.                 (set #defaction 0)
  1846.  
  1847.                 (if (= #visagerev 0)
  1848.                     (set #defaction 2)
  1849.                 )
  1850.  
  1851.                 (if (= #visagerev 1)
  1852.                     (set #defaction 3)
  1853.                 )
  1854.  
  1855.                 (if (= #visagerev 2)
  1856.                     (set #defaction 4)
  1857.                 )
  1858.  
  1859.                 (if (= #visagerev 5)
  1860.                     (set #defaction 5)
  1861.                 )
  1862.  
  1863.                 (if (= #visagerev 10)
  1864.                     (set #defaction 6)
  1865.                 )
  1866.  
  1867.                 (set #update-action
  1868.                     (askchoice
  1869.                         (prompt        #program-update)
  1870.                         (choices    (cat #propfont #update-none)
  1871.                                 #update-all
  1872.                                 ; (#update-since "39.0")
  1873.                                 ; (#update-since "39.1")
  1874.                                 ; (#update-since "39.2")
  1875.                                 (#update-since "39.5")
  1876.                                 (#update-since "39.10")
  1877.                                 (#update-since "39.11")
  1878.                                 (#update-since "39.14")
  1879.                         )
  1880.                         (default    #defaction)
  1881.                         (help        #program-update-help "\n" @askchoice-help)
  1882.                     )
  1883.                 )
  1884.  
  1885.                 ; (set #tt39-1  "DITHER COMPACT TIME")
  1886.                 ; (set #tt39-2  "COMMAND CYCLE NOCLICK NORMALNAMES RTG SORT TEST VCENTER")
  1887.                 ; (set #tt39-3  "INFO SHOWINFO")
  1888.                 (set #tt39-6  "NOICON NOFOREIGN")
  1889.                 (set #tt39-11 "BORDERBLANK NOFILECHECK")
  1890.                 (set #tt39-12 "COLOR DRAWER GAMMA NOPNG PATTERN")
  1891.                 (set #tt39-15 "LIST FONT ORDER")
  1892.  
  1893.                 (set #icon-dest     (tackon #visage-dest "Visage"))
  1894.                 (set #icon-dest-020 (tackon #visage-dest "Visage_020"))
  1895.                 (set #tooltype-pattern
  1896.                     (select #update-action
  1897.                         ""
  1898.                         "#?"
  1899.                         ; ("%s %s %s %s %s %s %s" #tt39-15 #tt39-12 #tt39-11 #tt39-6 #tt39-3 #tt39-2 #tt39-1)
  1900.                         ; ("%s %s %s %s %s %s"    #tt39-15 #tt39-12 #tt39-11 #tt39-6 #tt39-3 #tt39-2)
  1901.                         ; ("%s %s %s %s %s"       #tt39-15 #tt39-12 #tt39-11 #tt39-6 #tt39-3)
  1902.                         ("%s %s %s %s"          #tt39-15 #tt39-12 #tt39-11 #tt39-6)
  1903.                         ("%s %s %s"             #tt39-15 #tt39-12 #tt39-11)
  1904.                         ("%s %s"                #tt39-15 #tt39-12)
  1905.                         ("%s"                   #tt39-15)
  1906.                     )
  1907.                 )
  1908.             )
  1909.         )
  1910.     )
  1911. )
  1912.  
  1913. (set #install-020 0)
  1914.  
  1915. ; Install 68020 version?
  1916. (if
  1917.     (AND
  1918.         (BITAND #install-files 1)
  1919.         (not (patmatch "68000|68010" (database "cpu")))
  1920.         (not (patmatch "NOFPU"       (database "fpu")))
  1921.     )
  1922.     ; Well, there's a 68020 CPU+FPU at least...
  1923.     (set #install-020
  1924.         (askchoice
  1925.             (prompt        #visage-020)
  1926.             (choices    (cat #propfont #visage-000-only)
  1927.                     #visage-020-also
  1928.                     #visage-020-only)
  1929.             (default    2)
  1930.             (help        #visage-020-help)
  1931.         )
  1932.     )
  1933. )
  1934.  
  1935. ; Location for Visage.guide
  1936. (if (BITAND #install-files 2)
  1937.     (
  1938.         (set #guide-dest #visage-dest)
  1939.  
  1940.         (if (exists "Help:")
  1941.             (set #guide-dest "Help:")
  1942.         )
  1943.  
  1944.         (set #guide-dest
  1945.             (askdir
  1946.                 (prompt  #where-visage-guide)
  1947.                 (help    @askdir-help)
  1948.                 (default #guide-dest)
  1949.             )
  1950.         )
  1951.  
  1952.         (set #dest-guide-name (tackon #guide-dest "Visage.guide.info"))
  1953.  
  1954.         (set #guide-icon
  1955.             (if (AND (= @user-level 2 ) (= (exists #dest-guide-name) 0))
  1956.                 (askbool
  1957.                     (prompt #copy-guide-icon)
  1958.                     (help    " ")
  1959.                 )
  1960.                 1    ; Default is to copy the icon
  1961.             )
  1962.         )
  1963.     )
  1964. )
  1965.  
  1966. (set #languages 0)
  1967.  
  1968. ; .ct
  1969. ; Which languages that should be installed.
  1970. (if (BITAND #install-files 4)
  1971.     (set #lang
  1972.         (askoptions
  1973.             (prompt    #which-language)
  1974.             (help    #which-language-help "\n" @askoptions-help)
  1975.             (choices
  1976.                 (cat #propfont "Dansk")
  1977.                 "Deutsch"
  1978.                 (cat "English  " #builtin-lang)
  1979.                 "Español"
  1980.                 "Français"
  1981.                 "Italiano"
  1982.                 "Nederlands"
  1983.                 "Norsk"
  1984.                 "Russian"
  1985.                 "Srpski"
  1986.                 "Suomi"
  1987.                 "Svenska"
  1988.                 "ÃeÓtina"
  1989.             )
  1990.             (default #default-lang)
  1991.         )
  1992.     )
  1993. )
  1994.  
  1995. (if (BITAND #install-files 1)
  1996.     ; Default to install catalog files in the same drawer as Visage.
  1997.     (set #catalog-dest (tackon #visage-dest "Catalogs"))
  1998.  
  1999.     ; No Visage drawer known, fall back to Locale: instead
  2000.     (set #catalog-dest "Locale:Catalogs")
  2001. )
  2002.  
  2003. ; Where should the catalogs be installed? Only do this if we have
  2004. ; an expert user, and any non-english language was selected.
  2005. (if (AND (= (BITAND #install-files 5) 5) (<> #lang 0) (<> #lang #english-lang) (= @user-level 2))
  2006.     (
  2007.         (set #choice
  2008.             (askbool
  2009.                 (prompt  #where-language)
  2010.                 (help    #where-language-help "\n" @askbool-help)
  2011.                 (default 1)
  2012.                 (choices #lang-progdir #lang-locale)
  2013.             )
  2014.         )
  2015.  
  2016.         (if (NOT #choice)
  2017.             (set #catalog-dest "Locale:Catalogs")
  2018.         )
  2019.     )
  2020. )
  2021.  
  2022. ; Ask for location for extra tools
  2023. (if (BITAND #install-files 248)    ; 8 + 16 + 32 + 64 + 128
  2024.     (set #tool-dest
  2025.         (askdir
  2026.             (prompt    #where-tools)
  2027.             (help    #where-tools-help "\n" @askdir-help)
  2028.             (default "C:")
  2029.         )
  2030.     )
  2031. )
  2032.  
  2033. ; And now do the actual installation
  2034.  
  2035. (complete 0)
  2036.  
  2037. (if (BITAND #install-files 1)
  2038.     (
  2039.         (if (< #install-020 2)
  2040.             ; Install 68000 and perhaps 68020 version.
  2041.             (copylib
  2042.                 (prompt    (#copy "Visage" #visage-dest))
  2043.                 (source    "Visage")
  2044.                 (dest    #visage-dest)
  2045.             )
  2046.         )
  2047.  
  2048.         (complete 10)
  2049.  
  2050.         (if (> #install-020 0)
  2051.             ; Create 68020 version
  2052.             (
  2053.                 (working #visage-make-020)
  2054.  
  2055.                 (run "C/SPatch -oT:Visage_020 -pVisage_020.pch Visage")
  2056.             )
  2057.         )
  2058.  
  2059.         (complete 20)
  2060.  
  2061.         (if (= #install-020 1)
  2062.             ; Install 68020 version in addition to 68000 version.
  2063.             (copylib
  2064.                 (prompt    (#copy "Visage" #visage-dest))
  2065.                 (source    "T:Visage_020")
  2066.                 (dest    #visage-dest)
  2067.             )
  2068.         )
  2069.  
  2070.         (if (= #install-020 2)
  2071.             ; Install 68020 version only
  2072.             (copylib
  2073.                 (prompt        (#copy "Visage" #visage-dest))
  2074.                 (source        "T:Visage_020")
  2075.                 (dest        #visage-dest)
  2076.                 (newname    "Visage")
  2077.             )
  2078.         )
  2079.  
  2080.         (complete 30)
  2081.  
  2082.         (if (> #install-020 0)
  2083.             ; Delete temporary file
  2084.             (delete "T:Visage_020")
  2085.         )
  2086.  
  2087.         (complete 35)
  2088.  
  2089.         (if (= (exists (tackon #visage-dest "Visage.info")) 0)
  2090.             ; Install or update normal icon
  2091.             (copyfiles
  2092.                 (source    "Visage.info")
  2093.                 (dest    #visage-dest)
  2094.             )
  2095.             (if (> #update-action 0)
  2096.                 (run ("C/UpdateTT Visage %s %s" #icon-dest #tooltype-pattern))
  2097.             )
  2098.         )
  2099.  
  2100.         (complete 37)
  2101.  
  2102.         (if (= #install-020 1)
  2103.             ; Imstall or update "68020 icon"
  2104.             (if (= (exists (tackon #visage-dest "Visage_020.info")) 0)
  2105.                 (copyfiles
  2106.                     (source        "Visage.info")
  2107.                     (dest        #visage-dest)
  2108.                     (newname    "Visage_020.info")
  2109.                 )
  2110.                 (if (> #update-action 0)
  2111.                     (run ("C/UpdateTT Visage %s %s" #icon-dest-020 #tooltype-pattern))
  2112.                 )
  2113.             )
  2114.         )
  2115.     )
  2116. )
  2117.  
  2118. (complete 40)
  2119.  
  2120. (if (BITAND #install-files 2)
  2121.     (
  2122.         (copylib
  2123.             (prompt (#copy "Visage.guide" guide-dest))
  2124.             (source "Visage.guide")
  2125.             (dest   #guide-dest)
  2126.         )
  2127.  
  2128.         (copylib
  2129.             (prompt (#copy "VisageHistory.guide" guide-dest))
  2130.             (source "VisageHistory.guide")
  2131.             (dest   #guide-dest)
  2132.         )
  2133.  
  2134.         (if #guide-icon
  2135.             (
  2136.                 (copyfiles
  2137.                     (source "Visage.guide.info")
  2138.                     (dest   #guide-dest)
  2139.                 )
  2140.  
  2141.                 (copyfiles
  2142.                     (source "VisageHistory.guide.info")
  2143.                     (dest   #guide-dest)
  2144.                 )
  2145.             )
  2146.         )
  2147.     )
  2148. )
  2149.  
  2150. (complete 60)
  2151.  
  2152. ; .ct
  2153. (if (BITAND #install-files 4)
  2154.     (
  2155.         (if (= (exists #catalog-dest) 0)
  2156.             (makedir #catalog-dest)
  2157.         )
  2158.  
  2159.         (set #n 0)
  2160.  
  2161.         (while
  2162.             (set #language
  2163.                 (select #n
  2164.                     "Dansk"
  2165.                     "Deutsch"
  2166.                     "English"
  2167.                     "Español"
  2168.                     "Français"
  2169.                     "Italiano"
  2170.                     "Nederlands"
  2171.                     "Norsk"
  2172.                     "Russian"
  2173.                     "Srpski"
  2174.                     "Suomi"
  2175.                     "Svenska"
  2176.                     "ÃeÓtina"
  2177.                     ""
  2178.                 )
  2179.             )
  2180.  
  2181.             (
  2182.                 (if (AND (IN #lang #n) (<> #language "English"))
  2183.                     (
  2184.                         (set #catalog ("Catalogs/%s/visage.catalog" #language))
  2185.                         (set #destination (tackon #catalog-dest #language))
  2186.  
  2187.                         (copylib
  2188.                             (prompt (#copy #catalog #destination))
  2189.                             (source #catalog)
  2190.                             (dest   #destination)
  2191.                         )
  2192.                     )
  2193.                 )
  2194.  
  2195.                 (set #n (+ #n 1))
  2196.             )
  2197.         )
  2198.     )
  2199. )
  2200.  
  2201. (complete 75)
  2202.  
  2203. (if (BITAND #install-files 8)
  2204.     (copylib
  2205.         (prompt (#copy "GetModeID" #tool-dest))
  2206.         (source "C/GetModeID")
  2207.         (dest   #tool-dest)
  2208.     )
  2209. )
  2210.  
  2211. (complete 80)
  2212.  
  2213. (if (BITAND #install-files 16)
  2214.     (copylib
  2215.         (prompt (#copy "Kill" #tool-dest))
  2216.         (source "C/Kill")
  2217.         (dest   #tool-dest)
  2218.     )
  2219. )
  2220.  
  2221. (complete 85)
  2222.  
  2223. (if (BITAND #install-files 32)
  2224.     (copylib
  2225.         (prompt (#copy "MakeLink" #tool-dest))
  2226.         (source "C/MakeLink")
  2227.         (dest   #tool-dest)
  2228.     )
  2229. )
  2230.  
  2231. (complete 90)
  2232.  
  2233. (if (BITAND #install-files 64)
  2234.     (copylib
  2235.         (prompt (#copy "DeleteLink" #tool-dest))
  2236.         (source "C/DeleteLink")
  2237.         (dest   #tool-dest)
  2238.     )
  2239. )
  2240.  
  2241. (complete 95)
  2242.  
  2243. (if (BITAND #install-files 128)
  2244.     (copylib
  2245.         (prompt (#copy "UnpackILBM" #tool-dest))
  2246.         (source "C/UnpackILBM")
  2247.         (dest   #tool-dest)
  2248.     )
  2249. )
  2250.  
  2251. (complete 100)
  2252.  
  2253. (exit)
  2254.